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PROGRAM DESCRIPTION 


ABSTRACT 


THIS PROGRAM CONTAINS A SERIES OF la THAT CHECK 
THE TUBO DRIVE FOR PROPER OPERATION 


REQUIREMENTS 
EQUIPMENT 


PDP-11 COMPUTER WITH OR WITHOUT HARDWARE SWITCH REGISTER 
WITH CONSOLE TELETYPE, AND A TALL CASSETTE 


STORAGE 
THIS PROGRAM REQUIRES APPROX. 4K STORAGE. 
PRELIMINARY PROGRAMS 

CZTAAR 
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ES TRE 


LOADING PROCEDURE 


USE STANDARD PROCEDURE FOR LOADING .ABS TAPES 
OR A CASSETTE TAPE. 


STARTING PROCEDURE 
CONTROL SWITCH SETTINGS 
SEE S.1. 

STARTING ADDRESSES 


BACK SPACE FILE GAPS 





4.3.1 


4.3.1.1 


EOL 
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PROGRAM & OPERATOR ACTION 


SENRBLE MORY LSGE ie ON 3.) 


LORD A AL CASSE N BOTH DRIVES 


ve SW vee ¢ E SECTION 5.1) 


Ss 
THE insta WILL LOOP & TTY BELL WILL RING ONCE EVERY 
PASS, IF SW<10>=0. 


eee NOTE: IF USI ‘ay OFTWARE SWITCH REGISTER THE 
WILL TYPE “SWR=XXXXXX NEW=" AFTER TYPING 
HE NAME GRAM. 


T 
DRIVE SELECTION 


SELECTION "e a Oe HELL RE wt in — 
“He bgee 


Brum aSSeTTE aTTH 21 D_VECTOR 
RESPOND RS STARTED AT 210. 


STARTING THE 0, OR 214 ALLOWS THE OPERATOR 
TO SELECT THE + "8 gone Step. 


THE PROGRAM WILL TYPE “DRIVE(S)?”. 


EITHER OR BOTH DRIVES CAN BE SELECTED BY TYPING “A” AND/OR 
“B" FOLLOWED BY A CARRIAGE RETURN. 


ORIVE SELECTION EXAMPLES 


NOU £G)Tur 


DRIVE(S)? A,B 
DRIVE(S)? AB 
DRIVE(S)? B,A 
DRIVE(S)? B 


SE@ 0004 


SEQ 0004 


FOL 
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ADDRESS SELECTION 
STARTING 1 PROGRAM AT 210 OR 214 ALLOWS THE OPERATOR 


TO CHANGE THE “CONTROL AND STATUS“ AND “DATA BUFFER” 
Be ait 1 SSES, THE VECTOR ADDRESS AND THE 


THE PROGRAM WILL ASK FOR Hy. 3 DRIVES TO BE TESTED AS PER 


ons AFTER THE DRIVES HAVE BEEN SELECTED ILL ASK 

1. BUS ADDRESS OF THE CONTROL AND STATUS REGISTER (TACS) 

e. VECTOR AODRESS 

3. PRIORITY LEVEL 
AND T RATOR +3 Sop ITH THE DESIRED PARAMETER 
OR AC aM (WHICH EN" DEF S Reeve AS ‘SD. 
WHEN AL gL PROGRAM 
WILL T F THEY ARE OK AT 
WHICH TIME THe BPERATOR RE WITH A_“Y" OR 
“CARRIAGE RETURN” FOR “YES” ANYTHING ELSE IS A “NO™ 


ADDRESS SELECTION EXAMPLES 


Z Ba35s8 
S 


20—F007F 


oxnv<~4 
ADBMD 


SEQ O00S 


SEQ ooos 





GOl 
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SUBTEST LOOPING 


THE SCOPE ROUTINE (REFER 5.2.1) PROVIDES A MEANS By 
WHICH Oe Pt a CAN SPECIFY THE FIRST ADDRESS OF 


THE RATOR TYPE re pero “ (¢C)_ AND WHEN THE 
rn SCOPE STATEM Nt IS EXECUTED THE PROGRAM WILL ASK 


1. TEST PC--- THE FIRST ADDRESS OF THE yest (MUST BE A SCOPE) 
2. LOOP PC--- THE ADDRESS TO LOOP BACK T 


SUBTEST LOOPING EXAMPLES 
CE EROTOR. ars ah 


tsa Be ° ERATOR REE “gaseiagartnce netum “con 


MPLIES “LOOP PC"="TEST P 
, OPERATOR TYPES “ftC™ 


wee a 
iFaRST RET ADDRESS OF OF THE SCOPE 


-OPERATOR TYPES “*C” 
+es§ PC? ;OPERATOR TYPES “CR” 


;PROGRAM CONTINUES 
;FROM THIS POINT 


SEG 0006 


SEQ 0006 


TALL MOTION TEST 
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OPERATING PROCEDURE 
OPERATIONAL SWITCH SETTINGS 


Bott oa va x "Ged ee ar t i 


“S0F TWAR 
CONTROL: 
THIS PROGRAM ALS ORTS THE DYNAMIC LOADING OF THE SOFTWARE SWITCH 
REGISTER (LOC. ni7e) FR FROM te Fry. ats Eon be ACCOMPLISHED BY 
DOING THE FOLLOW 
1) TYPE CONTR <#G>; THIS WIL LOW THE TTY To ENTER DATA INTO 
LOC. 38 AT SeLe eSté POINTS bith N THE PROGRAM 
2) THE MACHINE WILL THEN TYPE: SHR=XXXXXXNEH= (XXXXXX IS THE OCTAL CONTENTS 
THE SOFTWARE SWITCH REGISTER. ) 
3) RETER THE te We’’ BY TYPED THEN THE OPERATOR CAN DO ONE 
OF THE FOLLOWING AT "Tre 
A) TYPE @ NUMBER TO BE: LOADED INTO LOC. 176 FOLLOWED BY A <CR>. 
afte Ys eMac oo PETHEEN 0-7 WILL BE ACCEPTED AND ONLY 6 NUMBERS 


pet KEY DEPRESSED THE SOFTWARE SWITCH 
REGISTER enti s WILL NOT BE CHANGED. 


B) A CONT <tU> IS DEPRESSED THEN THE PROGRAM WILL SEND YOU 
Back $8 oFee 3. 


WITH SW<15:08>=0 THE PROGRAM WILL PRINT OUT ON 
ERRORS AND CONTINUE IN TEST. BELL WILL RING 

AT COMPLETION OF A_PASS. 

THE SWITCH SETTINGS ARE: ‘ 
SH<15>=1...HALT ON ERROR 

SW<14>=1..:LOOP_ON TEST 

sW<13)=1..- INHIBIT ERROR TyPEOUTS 

SW<11>=1..: INHIBIT 

SW<10>=1:::RING BELL ON ERROR 

SW<10>=0.: RING BELL ON PASS COMPLETE 

SH<09>=1-.-LOOP ON ERROR 

SW<O7>=1..-LOCK ON r pede 

Suc 0b>=1.. DELAY AT END OF EACH FUNCTION 

SH<O5>=1..-RUN WITHOUT INTERRUPTS 

Bu<04>=1. ..TGNORE BLOCK CHECK ERRORS 

SW<O3>=1:: INHIBIT DATA COMPARE 


SE@ 0007 


Ta 
cz 


1 m0 
ADD. 


T 
p 


I 
1 


0 
1 
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s.2 SUBROUTINE ABSTRACTS 
S.2.1 SCOPE 
TINE CALL_(VIA_AN IOT NSTRUCTI S PLACED BE TWEEN 
enon fe INSTRUCTION erin rRee obBs RE STARTING 
BOORES "OF ER EACH TEST IN LOCATION “$1 PAR eok” AND eS PEAR aS IT IS 
BEING ENTE 
THIS ROUTINE SUPPORTS THE S/W SWITCH REG FUNCTIONS 
NOTE: THIS ROUTINE CHECKS THE TTY INPUT BUFFER FOR A 
“CONTROL C™ (REFER TO 4.3.3) 
5.2.2 TRAPCATCHER 
"+2" = “HAL NCE IS Is. REPEATED FROM LOC. O TO LOC. 776 
TO CATCH ant p BEYER RAP S, ANY UNEXPECTED TRAPS WILL 
HALT AT THE DEVICE TRAP VECTOR 
5.2.3 ERROR 
THIS TINE CALL (VIA A EMT INSTRUCTION) IS USED TO REPORT 
ERRORSS REFER TO 6.) 
Pet THIS ROUTINE SUPPORT AL; S/H. SWITCH REG FUNCTIONS 
aun IF T eet ien nek cait OPERATOR 
CAN n RESET S/W Si oh REGISTE BY 1BTt Ting A 
ONTROL G" <?G> BEF HITTING CONTINUE. 
5.2.4 TRAP 
A R OF SUBROUTINES ARE CALLED BY THE TRAP INSTRUCTION. 
FOLLOWING IS THE CALLS USED AND THE STARTING ADORESS OF THE 
5.2.4.1 TYPE ($TYPE) 
TYPE AN ASCIZ STRING ON THE TTY 
5.2.4.2 RDCHR (SROCHR) 
READ A SINGLE ASCII CHARACTER FROM THE ITY 
5.2.4.3 RDLIN (SRDLIN) 
READ AN ASCII STRING FROM THE TTY 
5.2.4.4 SETLOOP (T.SETLOOP) 


SETUP TO LOOP AS PER THE TTY 


SEQ 0008 


uononoenoenw nf 
uununnnnnaa 


JOl 
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THE FOLLOWING “TRAP™ CALLS ARE WHAT ARE JSED TO PERFORM 
THE TESTS. 

THE ROUTINES THAT ARE CALLED IS WHAT MAKES UP THE HEART 
OF THIS PROGRAM. 

WEG (T.WFG) WRITE A FILE GAP 

WRITE (T.WRIT) WRITE A BLOCK OF DATA 

READ (T.READ) READ A BLOCK OF DATA 

BSFG (T.BSFG) BACK SPACE A FILE GAP 

BSBG (T.BSBG) BACK SPACE A BLOCK GAP 

SFFG (T.SFFG) SPACE FORWARD A FILE GAP 

SFBG (T.SFBG) SPACE FORWARD A BLOCK GAP 

REWIND (T.RWND) REWIND THE TAPE TO BOT 

SELDRV (T.SELDRV) SELECT A DRIVE 


OoONnN crc wW £ WY 


.10 BLKCMP (T.BLKCMP) COMPARE READ AND WRITE BUFFERS 


KO1 
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S.2.6 THE FOLLOWING SUBROUTINES ARE CALLED BY A JSR 
5.2.6.1 DO.CMO 


THIS ROUTINE WILL L THE 7 BYTE OF THE “TACS” WITH THE 
FIRST BYTE FOLLOWING THE CALL 


N_THE FUNCTION IS TO BE PERFORMED A A al to a 
TAL] VECTOR IS SET TO “SERV™. WHEN THE FUCTION IS_TO BE 
RFORMED WITH “INTERRUPT ENABLE“=0 THE VECTOR IS SET TO “BADINT™ 


NOTE Res) PROVIDES OVERRIDE CAPABLITIES OF “INTERRUPT 
=1. 


ENABLE 

5.2.6.2 WAITFLAG 
THIS T Isc 7X AFTER A COMMAND HAS BEEN sen] TO 
ie TALL: oe fT HALTS, 8 ext ter TERMINED AMOUNT OF TIME A 


THE EXITS FOLLOW THE CALL AND ARE: 
1. ERROR NO FLAGS OCCURRED 
2. ERROR NO _ INTERRUPT OCCURRED 
3. NORMAL RETURN 

5.2.6.3 FLAGS 
THIS ROUTINE I 
gS ROUTINE W 
THE FLAGS. 
THE RETURNS FOLLOW THE CALL AND ARE: 
1. “TRANFER REQUEST™=0 AND “READY"=0 
2. “TRANFER Pay Dm =1 
3. “READY“=1 AND “ERROR™=0 
4. “READY"=1 BND “ERROR™=1 

5.2.6.3 0O.CRC 


; CALLED TO DETERMINE WHAT FLAGS ARE U 


LL TAKE ONE OF FOUR RETURNS DEPENDING ON 


CULATE “CRC”. 
IME WHICH MUST BE IN RO WHEN 


340 
DO 
ae 
xc 


5.2.6.4 A20cT 
THIS ROUTINE CHANGES AN ASCII STRING TO AN OCTAL NUMBER. 


LO1 
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734 


GETORV 


THIS ROUTINE IS USED TO ASK THE OPERATOR WHICH DRIVE(S) 
ARE TO SE TESTED 


ASKAOR 

T T eur ADDRESSES FOR THE “TACS™, 
HA sie BND THE 2S VECTOR AND and THE P PRIORITY LEVEL TO USE. 
TYPERR 


THIS ROUTINE IS USED TO TYPE OUT THE “ERROR” DATA 
EXAM 


THIS ROUTINE IS USED TO DETERMINE WHICH DRIVE(S) ARE AVAILABLE 
FOR TESTING. 


THE F est USED of? MAKE ADJUSTMENTS TO 
THE TUbO. BEFORE Us OF THEM LOAD ANL START 214. 


WF GSUB 
we ot FILE GAPS FROM “BOT” TO “EOT” 
hy Ss “ROUTINE. can BE USED TO ADJUST THE “WRITE GAP MONO” AND 


LAY MONO”. 
WRTSUB 
wry CONT K TA 
STAR contin INUOUS BLOCKS OF DA 


THE PROGRAM ‘W WILL sent THe Si An 
AFTER EACH a PRESS con 
BER Nock 


3 <iisieer, 730 = PA 


ate hats ieee ESE Tow 


FOR THE VALUE are SEM Meng NEL" 
ROSUB 


READ CONTINUOUS BLOCKS OF DATA 

START AT 230 

THIS ROUTINE CAN BE USED TO ADJUST THE “SIGNAL MONO” 
AND THE “THRESHOLD POT” 


SEQ 0011 


SEQ 0011 


TA 
cz 


fo 


re 


v4 


| ll ae) 


if 


TEST 


$ 
23-MAR-76 


3.8.7.9 


S.2.7.5 


5.2.7.6 


$.2.7.7 
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WGPBLK 
be a 7 ahs GAP AND A BLOCK OF DATA FROM BOT TO ECT 


POST AN UY corse 


= Fa Leap acre Et "FAL" ET EAB nono” 
ee IF aa a4 OFTWARE. SHITCH REGISTER, AFTER 


OR THE VALUE WITH th Scots x NERS" 
RGBLK 
ni PH 1s veep eevee “vatTy 
HI s AFTER “WRITE A BLOCK AND 
ry TO 855 JUST Lape IGNAL MON”. T 
SFFGSB 


rant A ay FILE GAP FROM “BOT” TO “EOT™ 


FILE GAP" ROUTINE 
THRESHOLD POT” 


mp 


THIS ROU ine CAN use ay “WRITE pits GAP“ FOR LOW SPEED 
F T USTED). OR AFTER READ OR 
BRITE oe: GaP w A BLOCK MATA F HIGH SPEED SPACE FORWARD 


(SIGNAL MONO CAN BE CHECKED). 


Ky ” FILE GAP 
TRIS ROUTINE SAN BE USED TO ADJUST OR CHECK THE “SIGNAL MONO”. 


eee -— =_— 


SEQ O0le 


SE@ O0le 


















NO1 


i ys SEQ 0013 
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ERRORS 
Rena Beare rei gtk fee: ‘e 
ie 


T anne RROR fe oW<l 
er WILL CONTAIN THE FOLLOWING: 


afer 'O THE ERROR WIL 

1. Re. F yok 3 NG PERFORM 
5: 8. 4 DATA 
4. A DATA STRING 
REFER T Me LIST Ie UNDER SERRTB FOR THE DIFFERENT 
ERRORS HAT c 
RESTRICTIONS 

F TARTING THE PROGRAM THE OPERATOR MUST INSURE THAT A 
CASSETTE Is CORDED IN THE DRIVE(S) TO BE TESTED AND IS WRITE 
ENABLED. 
MISCELLANEOUS 
EXECUTION TIME 


THE FIRST PASS TAKES APPROXIMATELY 4 MINUTES ALL 
SUBSEQUENT PASSES TAKE APPOXIMATELY & MINUTES 


STACK POINTER 

STACK IS INITIALLY SET TO 1100. 

PASS COUNT 

A PROGRAM PASS THRU COUNT IS KEPT IN “SPASS”. 

ITERATIONS ; 

PESSITETS*E Oe creme UM IOSTACEaN'rstIT 
R ORIVE), ITERATI 

SPECIAL REGISTERS 


RY_ AND RS AR gESERVED FOR “TACS” AND “TADB” THROUGH 
OUT THE PROGRAM 


eRReee 


38 


5390 
591 
S92 
S35 
S34 
595 
S96 
597 
$398 


Rees 


B02 
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PROGRAM DESCRIPTION 


THIS PROGRAM IS_A SEQUENCE OF INDEPENDENT TESTS THAT 


ndhossseal Po PFRIES OF “TRAP” CALLS TO ROUTINES THAT PERFORM 


OO et ee ae 


FREQUENT 


men pe 1 MOTION TEST CZTAD-D 
iti E 


ni pment CORP ice 


HpRoGRAN BY JIM LACEY 


t STHIS PROGRAM WAS ROSEELED USING THE PDP-11 MAINDEC SYSMAC 
j HPACKAGE (MAINDEC-11 -C3), JAN 19, 1977. 


+ 5 HEHE ME HE AGE SE HE SEH HE HE SE EE HE HE HE HE SE HE SH HH HHH EEE EEE EE 
TTT ilit rit titi 11111111... 11.1..1.2...h-tebstchdelhcheiohchcolchstetolehcheiciehchcheichatelchetel 
| HGnnnannenanananstaesnsenenerstsnaenenaranenenenenenssscneee 


GENERAL INFORMATION ABOUT THE TAL1/TIIG0 CASSETTE 
ADDRESS MNEMONIC DESCRIPTION 


777500 TACS CONTR BUFFER. gratys RECISTER 
777S5e TAOB pare STER 
260 TAVEC’ INT ERRUPT VE CTOR 


TACS REGISTER DESCRIPTION 


READ AND/OR WRITE? 


READ ONLY 
READ ONLY 


SE@ oOo'" 
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00 


ION TEST CZTAD-D MACY11 30A(10S2) 
ll GE 





C02 





SEQ 0015 
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NERAL INFORMATION SEQ 0015 
? READ ONLY 
9 READ /WRITE 
fii st 0 READ ONLY 
NA 0 READ/WRITE 
i READ ONLY 
i 0 READ/WRITE 
FUNCTION BIT 02 0 READ/WRITE 
FUNCTION BIT O 0 READ/WRITE 
FUNCT T 0 READ/WRITE 
O=Wat TE-FILE- 
1 
S= BACK 
K Spac 





0 WRITE ONLY! 


TALL MOTION TEST 


CZTADD.P11 
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001100 


00 
177776 
177774 


000100 
000140 
000200 
000240 
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SEQ 0016 
OPERATIONAL SWITCH SETTINGS 


.SBTTL OPERATIONAL SWITCH SETTINGS 


;* 

# SWITCH ae 

:# 1S HALT ON ERROR 

: OR aD Caton rypcours 

:& 

: ef IACHERY FOER Tore 

;* LL 

;* 3 LOOP ON ERROR 

;# 7 ON NT DRIVE 

* B LAY ay ND OF BAC H_EUNCTION 
:# a I None BLOCK Ane cK ERRORS 
;* 3 INHIBIT DATA COMPARE 


.SBTTL BASIC DEFINITIONS 
{INITIAL ADDRESS OF THE STACK POINTER ### 1100 ¥#8 
“ESUTY FOr: SCOPE SiBRede BEEINITION SF SCORE EACL 


:#MISCELLANEOUS DEFINITIONS 
HT= 11 ;;CODE FOR HORIZONTAL TAB 


LEE i ++ ESRF ESR CARRIAGE. RETURN nae 
Fy deiegh —* iebtin SaHGE tio 
5 ;;STACK LIMIT REGISTER 


PIRQ= 17777 


7777 Regier SLPSN a crores REGISTER 
paw. 15585 Hh Bispcay REGISTER 


;#GENERAL PURPOSE REGISTER ay 

RO= %0 33 GISTER 
Ri= “1 33 RAL REGISTER 
Re= xe 33 RAL TER 
R3= %3 $3 RAL TER 
RY4= “4 33 TER 
RS= “4S 33 RAL GISTER 
R6= vA =) $3 RAL TER 
R7= %? 33 RAL TER 
SP= %b 23 K POIN 

PC= “7 ;3;PROGRAM COUNTER 

;#PRIORITY LEVEL DEF INT TION 

PRO= 0 33 TORI TY LEVEL fs) 
PRe= 10 PRIORITY LEVEL 2 
PR3= 140 He PRIORITY LEVEL : 
PR4= 200 ;;PRIORITY LEVEL 4 
PRS= 240 ;;PRIORITY LEVEL S 


SE@ 0016 


Oe 
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cSt hb Plt OSI -nar-78 53150 Bacto osee AT TONS : _ SEQ 0017 
PR6= 300 ;;PRIORITY LEVEL 6 
Pee very PR7= 340 ::PRIORITY LEVEL 7 
bg9 F an guiTcn REGISTER™ SWITCH DEFINITIONS 
= 
b99 bab000 suis 1908 
700 020000 SWi3= 20000 
701 010000 SWle= 19900 
702 004000 SWilis 0 
703 002000 SW ~ 2000 
704 001000 tt = 1000 
705 000400 Swos= 400 
706 000200 SWO7= 200 
707 000100 SWOb= 100 
708 000040 = 40 
709 000020 SWO4= 20 
710 000010 SWwO3= 10 
$t3 teetetets ers 8 
= 
713 000001 St 
714 . EQUIV 9, SW9 
715 - EQUIV oh 
716 - EQUIV any 
717 EQUIV : 
719 - EQUIV : 
751 “EBUTV Ss 
722 7 EQUIV eat 
723 “ESUEY Sno! suo 
725 -#DATA BIT DEFINITIONS (BITOO TO BIT15) 
726 100000 BIT1S= TT eso 
727 040000 IT14= 40000 
728 02 BITiz= 20000 
729 010000 ITl2= 10000 
730 004000 Bitits 4000 
731 002000 BIT10= 2000 
732 001000 BITO9= i000 
733 000400 B1T08= 400 
734 000200 BITO7= 200 
735 000100 BITOb= 190 
736 000040 Bit = ¥ 
536 ental Tose 6 
= 
739 000004 Bi Tose 4 
740 BITOi= 2 
741 000001 BITOO= 
742 -6QU Vv T09,B81T9 
743 - EQUIV 708, 178 
744 - EQUIV 07,8117 
745 - EQUIV T06, BITE 
746 - EQUIV TOS, BITS 
747 EQUIV TO4, BITY 
748 -EQUIV BITO3,B1T3 
749 -EQUIV BITO2,BIT2 


EST CZTAD-D MACY11 SQA 1855) 
23-MAR-78 08:34 


BAS 


ie 


Cc 
PIRQVEC 


5p RARKEKRERKEKHK LRA RHH KEE 


C DEFINITIONS 
E8UHY BE T00;611 


alll TRAP VECTOR 


FOe 


i Track 


& 


Y ey VEC T OR 
Thy INTER NECTS OR 

INTE REQUEST VECTOR 
ee tll a Bl 
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eae are OTHE 


E ATR TRAP (BPT 


seegeeseeeseTAll stats ein tmcimnage 


kur Ge 0 WRIT FIL 
XWRITE= 2 me 1f0N 
XREAD= 4Y TREAD F TION 
XBSFG= 6 ; BACK ACE FILE 
x z 10 ;BACK SPACE BLOC 
<a G= le 5 ERE F FILE 
XSFBG= 14 ;SPACE F BLOCK 
= 16 ;REWIND FUNCTION 

-seeeesesesTAL! BIT ASSIGNMENTSsaeeneene 
et z 111s 
CRCERR= T14 
WATT OCK=BI TIS 
OAS Til 
tines Ti0 

roe ToS 
og = T 

R.REQ= TO 
INT. EN= TOb 
READY= 1 
ILBS= T 
FUNC2e= TO3 
FUNC1= IT0e 
FUNCO= SBsITOl 
GO= BITOO 
FUNCTION= FUNC2+FUNC 14+FUNCO 


HA SALAS AS AASSA SASS 
SASSAILIILAASLELDALILALLLALPLLADELALLELAALDOELEEDEAALEADAEADAE EDEL ELE 
;SPECIAL REGISTERS 


TACS= “4 
TADB= “5 


;R4 IS USED AS A 


R wick: 
GAL INSTRUCTIONS 


T/QUTPUT TRAP {IOT) ##SCOPES# 
RIOR TRAP (EMT) ##ERROR#* 


GAP FUNCTION 


GAP_FUNCTION 
K GAP CG Lon 


UNCTIO 
FUNCTION 


POINTER TO THE TAC 
RS IS USED AS A POINTER TO THE TAD 
SAPLLILLALALLLOTLLLELLP SLOOP EPLELEEVEDADELLDTLALELELELAEATELS EELS 


SE@ 0018 


Ow 
mam 
Oo 


SEQ 0018 


o- 
ND 


gas 8° 


~ 
a 
U4 


Oo 
N 


3a 


DVDOWDOODVDOOODOMOD 
= be be pee ee Be Be pe Bee Bee 
WONOU CWO 


furore 
fur 


sy 


| dl ad 
o 


000174 


900176 


TEST 
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ao00000 





566 
alae = 
i) 
NN 


7 
1 
ole 


A 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


SSSN8888 


oO 
88 
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etotatatatatet=t=t=t=, 


TRAP CATCHER SEQ 0019 
-SBTTL TRAP CATCHER 


Yat ATIONS FROM 4 - 77 oaNTER EN lil 
O. 1k ie vices TRAPS gett, 
be A A th I CATCH IMP ole LOADED VECTORS 


a BR Seargges, | ES RE MA REF 
seth inp aeBEGINT — TO Srentine ary FO CORT IN ’ 
fe Hi EE BNE) Re gA EEL ERR rest 
Ihe Sehr caue Ht re F ie GAP FROM 6 A 4 TO oF bata 
fe eR, BAR Rao 
JMP A FILE GAP 


aR K 
JMP aSFFG SPACE =F E OeaP PROM thor TO EOT 
inp aBsres eFHfe sept 
Ee a4 as a 





001100 
B81 188 
ns 
8 il 
iit 
evs 001114 
wa SOIT 
Bue Bolts 
847 001124 
848 O0011e6 
BY O01 1 30 
8SO 0011 
8S1 001134 
8Se 001135 
8S3 001136 
854 001140 
ese Olu 
857 001146 
Bes Dol iee 
860 pot ize 
sce Bolles 
863 BOLLE? 
864 001160 
865 
866 001162 
867 001164 
868 001166 
869 001170 
870 00117e 
871 001174 
87e 001200 
873 O01e01 
674 O0ie0e 
875 
876 001204 
877 001206 
878 001210 
879 OOlele 
680 001214 
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COMMON T 


000377 





HOe 
23-MAR-78 03:36 PAGE 20 


-SBTTL COMMON TAGS 


; + SEE HE 6 HE HE SE SE SE SE 0G A HH Hg a a aa 
:ATHIS a conTa NS VARIOUS COMMON STORAGE LOCATIONS 


ROGRAM. 
if re 


-21100 


RRORS 
TECTED 


peeeee 


R Re 
E NSTRUCTION 


& 

PC ot oF 

ABBRESS SF *BA0" DATA’ 
DATA 


0 

0 

0 + OTERRUPT ¢ MODE INDICATOR 
D 

D 


: 
2 ebrerinte 


Souav: Mah BES PS Pewee, 
hele att 

TPS: 4 bey PR Ee aT 6. Ss 
S1pB;  i7peee titty PRINTER G: BOpRESS 
$ Lt: BY 9 23C TAINS NUL ER FOR FILLS 

F LLS: ; Mi . 33¢ Tal my ILL Rh CHARACT ERS REQUIRED 
ab LG: “BYTE A He TERRINAL . FEAG Ratt hz) bey =YES) 

GAD: :WORD oO > CONTAINS THE FROM 
;;WHICH (SRE WAS catia 
.WORD O :: CONTA ((SREGAD) +0) 

SREG [WORD O >; CONTA ( ($REGAD) +2) 

T . WORD 0 ;; USER i 
STIMES: O 3; MAX. OF ITERATIONS 
SESCAPE:0 caaineceumecants i ;ESCAPE ON RROR ADDRESS 

RENE 399 Soper ae 

3 cil <18> j }CARRI RETURN 
SL ASCIZ <le> FEED 

1 OC) Re 4 iL, . RRL 
dAvec: .WORD 0 TORAGE FOR THE PC 
BYTNUM: :WORD 0 NUMBER OF By TES “READ™ OR “WRITTEN 
RCRCO: ‘WORD O !CRC CALCULATED F “WRITE” 
RCRC "WORD 0 :CRC CALCULATED FOR "READ" 
RCRC "WORD O :CRC FROM THE TALI FOR “READ” 


SMXCNT: 1 ;MAX. NUMBER OF ITERATIONS 


SEQ 0020 





SE@ 0020 


SE@ 0021 


SE@ 0021 


I0e 


23-MAR-78 09:36 PAGE 21 


COMMON TAGS 


CZTAD-D MACY11 3O0A(1CS2) 


23-MAR-78 08:34 


TEST 


fad 2 
gros a 
- e+ O98 
Susu YaS5S 
wn u> wazoa 
w Or) Bsaee 
WwW x conn 
td oO SE ore 
[vvy we ms s ¢ 
eae eo sre 
SEEROEE” EEO 
2,2 re Ee 
352555K= tah arated 
JEIERR ES 6 OFESS0 


oO 


Oo 


SEE g Ge 


RIE eR AURA Rt 


Eh a a ed a ed ad wd Ow tt 


Bassssssssssse83 
geeseteicrcccocs 


000262 
000000 


ooo000 o00cd0 


000000 


eee 


JOe 


TAD-D MACY11 30A(1052) 2@3-MAR-78 08:36 PAGE 22 SEQ 0022 
5: 3 “ CRROR POINTER ABLE SEG 0022 


.SBTTL ERROR FOINTER TABLE 
;#THIS TABLE CONTA NS THE INFORMAT OR EACH ERROR THAT CAN OCCUR. 

: #THE INE MATION B RF IN 

tSNOTEL ee aE sot PERTINENT DATA IG (SERRPC)) ONT: 
ENO : EACH ITEM CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 
RROR MESSAGE 


TEST 
23-MAR-78 08:3 


oo 
ND 
on aed 
~ 
Fat 
uu 
bee 
~ 
2 


32833 8 


ae 


TEe: 
1. HEADER 


gece 


WONT UI L£W-OW 


E ALL NUMBERS WILL BE TYPED AS & DIGIT OCTAL NUMBERS 


1 
EM1 ; IMPROPER FLAG SETTING 
DH1 ; TEST RROR TAO8 


;PC C TACS 
;SAVPC SERRPC SREGO SREGI 


WOOONDNDOWNDWWW 
bee eee eee 


ws 


fur 
wr 


; IMPROPER FLAG OCCURRED 
;TEST ERROR 008 


;PC PC TACS T 
;SAVPC SERRPC SREGO  SREG1 


BSERORe 


& 


;MISSED A FLAG 
;TEST ERROR 
TADB 


;PC PC TACS 
;SAVPC SERRPC SREGO SREGI 


WW WW 
—— pe 
or wo 


HY 


1 
332 1 
933 

1 

1 
3936 


; INTERRUPT FAILED 
;TEST ERROR 


4 PC TACS TADB 
;SAVPC SERRPC SREGO SREGI 


= 22 


; PREMAT REAOY OCCURRED 
;TEST ERRO 


;PC PC TACS TADS 
;SAVPC SERRPC SREGO SREGI1 


om oo oOoMmM OO OME OC 
“4 xa 
- 


a a 
-o 


;OION’T STOP_IN A FILE GAP 
;TEST ERROR 
;PC PC TACS TADB 
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0 
-s 
¢ ; 


88 88 88 


ae Ra 


Rtrte 4 
uno 
M-Ow 
—— ee ee he 
we we 
a2 na 


PERE ES Re RT ROR EME Lith iat SR RER PI 


ee 


oO 
= 
Oo 


KOe 


fee Se 


ST czTAD- -D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE 23 SEQ 0023 
23-MAR-78 08:3 ERROR POINTER TABLE SEQ 0023 
015044 DT! ;SAVPC SERRPC SREGO SREG1 
000000 0 
sive 86 
015737 M7 ;DION'T STOP ON CLEAR LEADER 
16102 MI TEST eect ome 
01s044 OT! ISAVPC «SERRPC SREGO SREGI 
000000 0 
015773 me Bo BAD DATA READ 
016162 DHe :TEST ERROR EXPT’D RCV’D BYTE 
PC TACS DATA DATA NUMBER 
015056 oT2 :SAVPC SERRPC SREGO $§GDDAT SBDDAT BYTNUM 
000000 0 
;ITEM 11 
016011 EM11 ; ILLEGAL_ SUFFER 
016601 DHS : TEST RROR 
:PC Cc TACS 
015126 DTS :SAVPC SERRPC S$REGO 
So0600 0 
; ITEM le 
016035 EMi2 CRC_ERROR 
016323 DH3 i TEST ERROR WRITE READ TU6O 
PC TACS CRC CRC CRC 
015074 DT3 'SAVPC SERRPC S$REGO RCRCO RCRCL RCRC2 
000000 0 
; ITEM 13 
016047 EM13 ;SHORT RECORD 
016461 DH4 i TEST RROR BYTES 
PC TACS TADB LEFT 
015112 DT4 + Cvec SERRPC SREGO SREG1 STMPO 
000000 0 
;ITEM 614 
016064 EM14 ;BAOD INTERRUPT 
018601 DHS :TEST ERROR ear 
015126 DTS :SAVPC SERRPC S$REGO 
000000 0 
@& rENse: ;ITEMS 201-202 
016664 M ;TALL FA TO RESPON 
Bierse Brea, = ipeee Taes a 
016652 OT201 :SERRPC TACS 
000000 0 :BOTH NUMBERS ARE TYPED AS OCTAL NUMBERS 
016713 4 ;NO DRIVES AVAILABLE 
oie73 Giete iceee 
446 000000 0 ; 
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BES SSHTERES 
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& 


eh eh te ee ee ee 


R SSSSRrReneees BIEN RES 


RPGR RAIMA Se cea oac case 
S88888 SSSS8888SS8888 SBBBs ssssssss 


ee 


SBS59 99555 000550 0000099909 e090 90 0n00 San DDbRRn5 50000000000 
rust 


oO 
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tt 
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LOe 


TEST CZTAD-D MACY11 30A(10S2) -MAR-78 08:36 PAGE 24 SEQ 0024 
23-NAR-78 ee START OF Bor SEQ 9024 
SOLASLATATATATAASAAAAAAAAASTASASASOAAASASASASAAAAAAAOAS ESS ASSS SSS SSS SS 
Moonee eee eee eecacenacanonacancsacancnseasonsensoneanenneae 
; ERASER EAAEAAEE EELS EE LALLA LALLA ALAA LARA RHEE EERE 
rt VS 1E ES Bele Skee 
ive BOORESS SELECTION 
:BEGINY IS FoR MANUAL OPE 
INARA RMEE EE i EO a 
SO goso0s a BEGIN: CLR RS as iy ;NORMAL START 
ue8 Se Bodd8e tateret CMPB te 08 es s CASSETTE DOF. so 
438 3938 000260 001230 ene #260, JUTAVEC +e RDBRD CecToR ” 
476 0010 BNE AN :GO GIN CODE I 
208 705 000001 BEGIN2: MOV Grys iGeY Poa Brice Flac 
ee 7 ba BANCRN :8 GIN C Ro 
10 012705 o00002 BEGIN3: HOV #2 RS ASK FOR DRIVES AND ADDRESSES 
ROS3RE 000003 BEGIN: MOV Bghcrs 


.SBTTL. He "2Grnon | THE COMMON TAG 
; ;CLEAR OMMON T _pgertae 
aSCHT ber LOCATION TO. BE CLEARED 


= 
Re 
8 
8 






012706 001100 Seeeeal Tie . wisi ; SETUP THE Ee acK POINTER 

012737 006570 900020 jee: nov assc stStvece C3 E207, VECTOR FOR SCOPE ROUTINE 

016737 508 00030 mov eee iV C'; fi VECTOR FOR ERROR ROUTINE 

O1g737 14554 R895 MOV 5 C ik VECTOR FOR TRAP CALLS 

815537 Biaees Bopase y : BOPURVEE ;;POHER FAILURE VECTOR 

012737 000340 MOV ¥ sPHRVEC* Ht 7 

137 406 006400 MOV SE HH Toe END-OF -PROGRAM COUNTER 

Oori76 LR fries 33 Ni i I NUMBER 0 OF ITERATIONS 
sisae Go000) got nove SLegeRnex =f LL ONG Eno Es Ae poe 
018737 Obless OOL110 ee nov .° PERR Oe oe P — 
;;EQUAL TO A Ler ee Toe oR Register, Ie ne 

G17 BEOPES cooony YAR SSEaacee” | SVE Ream TUE 

Bisa? | 177596 1149 HOV absuA SUR av ae FOR B HAROUARE SWICH REGISTER 
15 be3939 135359 094438 CMP eborse 3 3 ORO To" REFERENCE RAROUARE Sti 
16 001012 BNE 665 ; | BRANCH HI F NO NO TIMEOUT TRAP, OC OCCURRED 


| BRANCH IF NO TIMEOUT 


TALL MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE 25 SEQ O0eS 


CZTADD.P11 23-MAR-78 08:34 INITIALIZE THE COMMON TAGS SEQ 0025 
1067 001722 012716 001730 64S: MOV #65S, (SP) ;;SET UP FOR TRAP RETURN 
oe OOD t Soy sPOINT TO SOFTWARE SWR 
153 BIER flee BRR YFa BBLING ccs. BBY RYSE AcE Bases ar’ 
1071 66S: + ;;RESTORE ERROR VECTOR 
7 
1833 SE YpE The’ RARE. OF THE PROGRAM IF FIRST PASS 
1975 901750 00S227 177777 i paar TIME ® 
as 
1838 ees 893939 006432 oo00042 eye Sfow,one BRANCH 
1078 Boisee fonds: ooz0e4 eee D aes Paik ae 
1860 , ‘ .SBTTL GET VAL unt" SOF TWARE sutle O dg. > nananl 
108s B77 3759 001140 000176 ene SWR, @SWREG {Bran Pretttcn REG poston 
1084 io5s BNE bes’ iar, 
19e 02019 TSWR os i tGeT oe SETTINGS 
1087 02014 1127 000001 001134 673: MOVB #1, SAUTOB ;;SET AUTO-MODE INDICATOR 
© Beaman eae wgor0:" —“BBErz comes ct BBTOMERLEE 85°17 
1091 002036 here: : 





NOe 


TA11 MOTION TEST CZTAD-D MACY11 398.1 ) -MAR-78 : SEQ 0026 
CZTADD.Pil 23-MAR-78 0 gars + OBE de F SOF THARE. bP ren ge Fe rer SEQ 0026 

10932 ; 5 SE SE SE SE 4 AE ME HE SE 4 JE EE EE a a SE EE a aaa 
te 5 9 0-804 0 J i a 
1996 , THE CONTENTS OF RS DETERMINES WHAT WILL BE DONE 
1097 RS=3 
1038 ; Rei aa ASK FOR a Ral iW AND ADDRESSES (TACS AND VECTOR) 
1190 : =4 Y THING 
H 183 10504 Ta cate - cecaenmemaaiea i ampemmammmenm tre: 
11 DE : + EK FOR DRIVES? 
il 96 aut Brae : 
il 9047 32 007422 , BBASKORV :GO GET DRIVES TO BE TESTED 
1197 902089 0053 DEC oe ee isk OR ADDRESSES? 
1103 posce osue4 Bo4735 007532 ia ts @BASKAOR ‘85 ber Pais ADDRESSES 
lll 5 RRRREEE ay annaathtrcrennscccccnunnanabanodboonsnbacnsanseunnes 
tits 5 96-93 3S JE 3 JE J J a a a go 
1113 oat THAT “TACS” WILL RESPOND TO ADDRESSING 
1115 1. TIMEOUT OCCURRED 
1116 : A. TYPE ERROR MESSAGE 
A142 : B. EXAMINE RY sane 
1 it H % Ruzo xan (42) 

4 ; )=0 GOTO BEGINX 
; B. ty )>0 GOTO SENDAD 
1 II. TIMEOUT DION’T OCCUR 

: A. CONTINUE 
} + THKKKAAESHERSHKEREAEKRASSSSSELAAAKKAAAKKEAARAKAETRKRAAKKAAEAKRRRKE 

a4 002060 012737 002076 ocoo004 éfKADR: OV 818, J#ERRVEC 3 IN CASE | oF Camgours 

38 902070 398 Aad 177124 rst gTACSL iSEE iF f Tait mEESPONDS 
1131 902076 BBS 00 1S: INC RO Con & HERE oN TIMEOUT 
1132 O0e21 2626 CMP (SP)+, (SPi+ 
1133 002102 2737 O00006 000004 2s: MOV SERRVEC+2, JSERRVEC T TreguT VECTOR 
He Bete Bt i Puan 
1136 002114 104201 ERROR 201 1 A FAILED TO RESPOND 
1137 O0e1 os : 
1i3@ Bosies Bossy [000e vey aie OPERATOR fnpure? 
1139 OO0ele4 001344 BNE BEGINX ;BR IF Y 
at Besise Berean 0002 ey Balan” Bete Ronan “OOESS 
1142 002134 7 
ive 902134 000137 006432 so IMP ae ENOAD 





~ 


top: PI 


mo 
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cz 





(aeatatababetebebatepapetepepseepepetesabepebapepebabepebebooeeepbapebeoesnpeecnepababetapebebepepeeebebenemeee 
- . bb bb 0 bb = bb bb be b= DP bP 
BFR LGC SBBIRRIGHH Bsa oad FIN“ SSSGEATERK SSNHP OO .pw wee 


oo20e4 
001240 001244 


wo 
wo 





B03 


BO-D MACYI1 308 1052 )— Fan cor HARE Sat TCH REGISTER os 


TEs ttt LL bbl debehehaheheheiehehehebehehehebebeiehehehehohehchehebehohehchehebchchehehehehohoheliichel 
5 5 HEAR AEA aE OE aE 0b A AE A a 0 a a a A a aaa aaa 


;MAKE SURE THE ORIVES IN THE ORIVE TABLE CAN BE TESTED 


tr. aiid eA oe AGEN NOT BE TESTED 
1 Me Re R40 iat sate ee o 


II. 80TH A BRO OR TABLE BUT ONLY 
e- eee FROM THE DRIVE 
TINUE I 


Ill. DESIRE et MP BE TESTED 


spt tnaeneesanrrnarneenenconnagengemgergrznntt 


GINX 
SENOON 
HE 8 OF THEM CAN BE TESTED 


Oe Oe ee eee ee ee eee eraee 


binebr Y,RO ;PICK OF ASCII DRIVE KEY 
, J8EXAM : GEXA FIRST DRIVE 
; TEST---GO CHECK NEXT 
MOVE 1(RO), (RO) i RE i ITH 2ND 
BEQ ; F OR VE SELECTED 
, JBEXAM :60 EXAM 
BR : OK T i 
CLR (RO) :CLE VE CODES 
1S: PAC RS 168 Ean 
Jsr PC, a8EXAM ORIVE 
2s abun SOR Y,RO icteee oe POINTERS 
MOV SSBRYPNT ‘ 
CMPB «RO), 1 (RO) ;1ST = 2ND? 
BNE 3$ :BR IF NO 
CL 1(RO) i YES-~—CLEQR 2ND 
3s: TST (RO) :ANY ORIVES? 
BEG S$ :BR IF NO 
S$ ERROR 202 ;NO DRIVES AVAILABLE 
MOV 82,RS :OR A: S 
TST RY : OP’ I 
Soy Ege RO *GET MONITOR RETURN ADDRESS 
; Ss 
kid ES oe GO noni! 
MANUAL: CMP RY, 8 . 
BNE 
MOV -1,R4 
OK: MOV RY, SBASKKEY 
BR START 
PWRST: TYPE MSGID ;POWER FAIL RESTART 


MOV bORVKEY , J8#ORVPNT 








’ 


TALL MOTION TEST CZTAD-D MACY11 30-(10S2) 23- SEQ 0028 
CZTAOO.P11 23-MAR-7. 08:34 GET VALUE sar AF SEQ 0028 


;SETUP TAL1 TRAP VECTOR 


1200 002312 012777 012386 176710 START: mov NT T,STAVEC 
te 
1308 30835 135° Bodkig 138392 HOV Tie {LOCKOUT ALL 1/0 INT 
1} Ge 12 MOV aes ;SETUP T y acs 
es 
1305 Besa poen G8 y62 cL i SEIN, Me Fest T NUMBER 
i BOE 5 14 CLR Y : ;CLEAR THE LOOP P UNDER TTY CONTROL KEY 
ees 
1882 Basses 815587 sapnas BM ae Ry GET bRive’Bolnter 
1¢09 002366 010137 001236 MOV VE TO POINT 
1 i RS a SE eae on 
1 Y ) 
1812 a i la 001250 Ho (Bt), as 8c v sGET C UR ne ict in FOR TYPE-OUT 
1818 2 io4sot Bd 7se6 ae TYP 4. ; TYE The 
iste 144 tet —_— _ ‘BA IF Te 
lel i3y i 4 001241 TSTB DBORVKEY+1 : TWO | We AVAILABLE? 
1318 ; 001216 fre @SMXCNT * 3SET if of To ni Ae PER TEST (ONE PER DRIVE) 
leet Ail 001250 MOVB (R1), I@CURDRV ; FOR TYPE-OUT 
i 3 O12 1 nov Y,R : SET we 
1864 141137 Oe Rove (RL), SeCURDRY RO GET PECOND DRIVE 
ise soi Boles nove AjesaDvent HEE Pees con nor eye peu 
1583 8 33 4 001106 MOV ae #SLPAOR Seo ihe He Scope ADDRESS 
1550 11 Tete BRE 
1231 VER MR kh el 
123¢ RMINE THE AMOUNT. OF TIME TO 
1 over QUE T AND THE STALL TIME TO USE 
1234 ieee fee ae Lae CR FUNCTION. g COMPLET 
le 737 7 001172 MOV SFATAL SCAPE ; RR 
i535 rea tt ; ONS ERRORS 
1238 012737 0777 o12012 MOV atc IT1S QeMAXCNT ; E COUNT 
1e tieri4 000016 MOVE 8 XRWND , STAC i INSURE NO ERROR DUE TO “CLEAR LEADER™ 
1S? iia fe om Ihe a WF 
124 : 012010 o1201e SUB QEHICNT, DEMAXCNT :GET THE TIME IT TOOK TO WFG 
ious ip Oiedle Inc 3 aMAXCNT :MAKE IT BIGGER 
{Sue i Bispis ROL SSHAXeNT 
124% CLR RO 
1247 CLR i 
tong : 902616 176442 nbV 84S QTAVEC ;SETUP TQ11 VECTOR 
1 1126714 101 MOVB BXWEG!INT.EN!GO,3TACS ;START A “WFG" 
1250 005037 177776 CLR aePs > ALLOW INTERRU TS 
1251 i 000001 3S: SUB #1,RO :START TIMING HOW LONG 
12s¢ S056 i SBC Ri ; IT TAKES TO WRITE A FILE GAP 
1254 0'2737 000340 177776 MOY #340, aePS ;LOCK OUT INTERRUFTS 
1255 0LU432 BR FATAL :IT TOOK TO LONG 








TAL1 MOTION TEST 
23-NAR-78 06:34 


ohne Oke Sone 


oe 
wv) 


fururururorurory: 


VeazZan-3 


Rada 


ee ee ee ee ee he he ee ee ee eh be hh Pe eh 
fu 
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bs 


1 








CZTAD-D MACY11 30A(10S2) 


23-MAR-78 08:36 PAGE 29 


GET VALUE FOR SOFTWARE SWITCH REGISTER 


4S: 


SS: 


FATAL: 


;65S: 


bas: 


18: 


Ri ;DIVIDE THE TIME BY 2 
RO, @#STALL ;AND SAVE IT AS THE STALL TIME 
RY’ Seetactse 
wBADINT, JTAVEC ;SET TRAP CATCHER 
ggORVKe t+ 5 THO, S$? 
‘ ;SELECT THE OTHER DRIVE 
OR HUND “aTACS :BvoID HetAR Peeper” ERROR 
:GO TO OXIDE 
KEY :GO START TESTING IF_NO MANUAL 
rst ° ; OPERATIONS REQUESTED 
XONT ; INCREASE THE WAIT TIME 
gt :GIVE CONTROL TO THE OPERATOR 
65S ;; TYPE ASCIZ STRING 
4§ 2: VER THE ASCIZ 
(15><12>*FATAL ERROR ON DRIVE # 
CURDRV ;CURRENT DRIVE 
42,R :CHECK FOR A MONITOR 
asi Pea 
— :ERROR OCCURRED BEFORE TESTING STARTED 
1S : HANGUP 











E03 


TAL] MOTION TEST CZTAD-D MACY11 3 ac 1052) SEQ 0030 
CZ bop Pit 33-mar-78 de ? REL ND, part E, RE FRO, REAB SEQ 0030 
1286S H er an ane 
1286 tRTEST 1 REWINO, WRITE, REWIND, READ 
1287 jeeneetaensuneunenaundensnnbeneeaehaeneeaeseenennenyannennennes 
1288 762 900004 sit SCOPE 
1 ca 012737 003016 001172 MOV aTST2,SESCAPE ;;ESCAPE TO TEST 2 ON ERROR 
1290 772 104422 SELORV ;SELECT DRIVE FOR TESTING 
1532 i 473 017012 BRT po WLNK 1 is re ON TAH onic 
1535 104421 REWIND ; :G TO BEGINNING OF TAPE 
1S3e 10 i 433 ow BE ReMP aidtie ic READ aire WRITE BUFFERS 
Led Ooscle 016758 RUNK 1 LINK 6 The Reso READ 
1 003014 O170le NK1 *LINK 18 T OUOFEER 
1638 3 jiupengrennaeevaceennesensusesensensusbisunensunesonnatanoess® 
1 ETE TEST BSBG AFTER WRITE AND READ AFTER BSBG 
1360 fh: I A e+ 
130 903016 H Te: SCOPE 
1303 12737 003052 001172 MOV #TST3, SESCAPE $sESCAPE 0 ae ON ERROR 
1303 003026 104422 SELDRV 5" Tye OR TESTING 
1304 00:20 : 19uiel WIND 
1305 0030 104413 017012 ITE ,WLNKI Bite fe 
1306 104416 BSBG HE BLOCK 
1 194414 016756 AD ,RLNK1 
1308 104423 KCMP Cone READ BND WRITE BUFFERS 
i3va Bo sce8 eae HUNK MK 16 ie READ, BUF HOFFER 
1311 : seeped lenensenennzsnazezzssseressehttieatanttnstnitiettoee 
131e RTE TEST BSFG AFTER WRITE 
iste Ht ag saasaagonenecagnosennapeeiiamingr 
1315 003054 012737 003106 001172 MOV #TST4, SESCAPE 3 sESCAPE 10 TEST 4 ON ERROR 
1318 003062 104422 SELDRV SELE DRIVE FOR TESTING 
12 Goses towel REUTN  ac ie oes 
1318 003072 104415 ini Bors praie Pn ove Phe 6 BLOCK 
1354 003100 1Bu 423 KCMP yt READ AND WRITE BUFFERS 
1322 003102 016756 LNK 1 :LINK TO t READ BUFFER 
1323 003104 O170ie2 ‘LINK TO THE WRITE BUFFER 
i3e2 g ig fepgesedneseneppeecsecqteneranenaquacssasonennennsnansnsanecsse 
1326 ee ee 
1327 003106 ocOD0004 $674 SCOPE 
1328 003119 012737 003156 001172 MOV aTSTS, SESCAPE 3 ESCAPE. 10 Q TEST § ON ERROR 
13¢9 903116 iouNze SEL ORV «DRIVE FOR TESTING 
1334 0031¢° 104413 017012 WRITE ,WLENKI 186 19 BLOCK 
1332 31e6 104421 WIND :GO TO oS 12 
1333 003130 104414 016756 READ ,RLNK1 :READ 
1334 903134 23 BLKCMP :C THE READ AND WRITE BUFFERS 
1336 bosiae ofsars SNK: iti TO THE WRITE BUFFER 
1339 posiue 104416 BSG BACK i are 
1339 bo3180 ipa4e3 — BEKCMP — REA THE READ AND WRITE BUFFE 
; Ul RS 
1340 003152 016756 RLNK1 :LINK TO THE READ BUFFER 


Lae 
_ 


PRRs? hb iil BERERPD ARR Ad Cia date alee Ee ES EE ae 


ne ee ee eee eee 


CZTAD-D MACY11 oC 16s Sr 
: TEST BSBG AFTE 


EST 
23-MAR-78 O08: 34 


003is4 017012 


272728 


MT furuG) 


[we | ed el led 
WtH—WeuNn 


E39, 
cane 


00 
Note 


ee 
o 

givs 

Ww 


32777 


gritty 
WEowewN 


OOK ee - OOK ee ee OO 
>. b 
530 
KOM RK eee 


OM town 


0032e6 001172 


017012 
016756 


016756 


003266 


017012 


016756 


003342 
017012 
016756 


017016 
016762 


iATEST 10 


EAD »RLNK1 


Os: 


eTST&, SESCAPE 






WLENK 1 ;LINK TO THE WRITE BUFFER 
, JREEENES THe nenenseeneuneuseusennaessnnnisnneannessensenannsenees 


: RR 
ss EO cement vere Br ae Bion 
: ; sESCAPE i ef 


T 6 ON aheek, 
tye OR TESTING 
Bf bs 


Ste iss mS ter WRITE BUFFERS 
noe 10.1 bata BOUFFER 
‘Con 


C WRITE BUFFERS 
LINK T w O BUPFER . 
LINK TO T 


ITE BUFFER 


s eneeentiechemcenemerinnavtatelitretercerichtheste 
T 6 TEST BSFG AFTER SF 


SFBG AFTER REWIND AND 


SCOPE 
MOV eTST7, SESCAPE 
LORV 


WIND 

ITE ,WLENKI 
REWIND 
anes 
eS ay 


Ty 


»RLNK1 


L 
REWIND 
WRITE ,WLNK1 
8SB8G 
READ »RLNK1 
BLKCMP 
RLNK 1 
WLNK 1 
waite »WLNKe 
READ, RLNK2 
BLKCMP 
ee 

NK 


BG 
pe a a a 4. 
;;ESCAPE TO rest 7_ ON ERROR 


LECT. Tye FOR TESTING 
SWRITE ONE BLOCK OF DATA 
“BOT” 


Pace HE DATA 


R_T 
; BACK THE DATA 
TREAD THE BLOCK 


E BUFFER 


TO 
,SERENEONOetenseneensersensrnenransanabennenaeanenannnenaneents 
T WRITE AFTER READ 
jFaSeunennsensenesoennaunneeHuGeOAOOHASGANROEEROEEROEERREEEEEESS 


SCOPE 
MOV eTST10, SESCAPE mmeasiihal TO SELECT DA ON ron Te 
DRV F ELST Ene 


oO “CL 


Hr AY 0 DATA BLOCK 
: toe father ra 


: COMPARE THE READ AND WRITE BUFFERS 
?LINK TO THE READ BUFFER 
:LINK TO THE WRITE BUFFER 


WR 
Rit BLOCK 
I 


T 
ieee 
3; AND 
COMP THE READ AND 3 BUFFERS 


LEN 18 THe WRITE BUFFER 


WL 
 PORGURERONEDEREANDORRScenenennensenenehdenseseuessucesnesuaeseds 
TEST WRITE AFTER WRITE AND READ AFTER 
5 0 ESE SE Ae Je ae ae A SE 2 ie ee A a HH HH aE HHH 


; oC 
3c T AND WRITE BUFFERS 
T . BUFFER 





ND 
~~ 


ee ee ee Be ee ee he ee he be be ee he be ee be be be be be Pe fe he Phe bebe he be hehe be hehehehe | 


SESLESSEELESSE SSCS ES ES SES LEC E ELSES ESL ELE SSS LEE LES 


8 


SR2oRoSs8s 8 
Be 
3 
3 89999990- 
oir — iene FUT 


be 


LOVH SOO VOU £ure-O DBS 


GSBVTNEWM—-GOBVR LOH Soa VO 


wu 
ue 


T 


T TAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE 32 
33-nar-78 68:34 7 T10 Test WRITE AFTER WRITE AND READ AFTER READ 


TST10: ta 


SEQ 0032 
SEQ 0032 


ra 7 003406 001172 MOV aTST11, SESCAPE HHESCAPE. TOE oh ve roe fEsriNc 
i : REP RY 2 f mV C PRDER™ 
a ; 017012 WRIT HUNK ;WRITE TWO(2) BLOCKS 
—n REUt 5 ;GO TO BOT 
| B1ees Rese TALE stilt 
3 BE KOMP , WRITE BUFFERS 


;COMPARE THE READ AND 
RtNKS ‘LENE 18 THE Gave °BOFFER 


WTI Iiiiiitittiiiiitiiititiiitiitiiiiiititiiiiiiitiiicirirtsi rs) 


Ons 


“Oo 


;#TEST 11 TEST BSBG AFTER FSBG 
= s ERERKKEKSEKERESEREEAKKAKASKKAAAKHALERKKAREAAKAKAKEALHRAAKARAAELREAE 
posai8 Ayeiaty 0034S0 001172 Werks aov #TST12, SESCAPE ESCAPE TO TEST ERROR 
Besuie 1044 2 oY ov , ‘is sSeLEeT oAfve” FOR TESTING 
003420 104421 REWIND :GO TO “CLEAR LEADER” 
DOIEe 1oaig pi701e Way TE , WL3NK :WRITE TWO(2) BLOCKS 
003432 1o4dlé shee BcaG “sai K RT OcK 
BONN SHE B58 iBeck OVER, Ine Tat BLOCK 
104414 016756 ,RLNK1I ;READ 1ST K ell. 
oos442e 104423 KCMP ;COMPARE T AND WRITE BurFERS 
44 016756 NK1 ;LINK TO THE READ BUFFER 
003446 017012 WLNK1 ‘LINK 10 THE WRITE BUFFER 
Wert iiiitiititiiiisiiiitttiiii reir torr ire re rest re 
:#TEST 12 TEST READ AFTER SFBG 
+s PHHHSSREKEERSERERELKKAKKAKRERAEKRAAEHKRKKKKKKKKARKEKREARAKAKHRELAAKEE 
003450 OO0004 tSti2: SCOPE 
003452 012737 003512 001172 MOV STST13,SESCAPE ;;ESCAPE TO TEST 13 ON ERROR _ 
903460 i uge LORV :; ; SELEC OR ve FOR TESTING 
104421 WIND : © *C. LEADER™ 
003464 104413 017012 WRIT , WLNK 1 :WRITE TWOC2) BLOCKS 
70 1O4413 017016 WRIT * WLNKe 
74 104421 REWIND ;BOT 
003476 1044en SFBG :SPACE OVER THE 1ST BLOCK 
903500 104414 016762 RE , RLNK2 ; THE 2ND K 
eosene breed acs CORN Tee Rese SbeeeelT® SUrFERS 
003510 017016 WLNKe *LINK TO THe ITE BUFFER 
5p LAAAEKRAKAKASKKKKAAAKAALALLALAAALEKLAAALLAAAAHAELKELARERAAEE REE 
:&TEST 13 TEST SFBG AFTER BSBG 
= + SHKESKEEESHSRAKKASAAKSKKAKASKASKSAFSEFERKKKKAKTAKRAEKKAAKHRARAKHRAAE 
003512 o00004 tST13: SCOPE 
003514 012737 o035S56 001172 MOV BTST14,SESCAPE ;;ESCAPE TO TEST 14 ON ERROR 
1 a5 LORV ; SELECT OR ve FOR TESTING 
104421 WIND : 0 “CL LEADER” 
104413 017012 WRITE ,WLNKI :WRITE TWOC2) BLOCKS 
104413 017016 WRITE *WLNKe 
104416 BS ;BACK SPACE OVER BOTH BLOCKS 
3540 104416 8SBG 
3542 104420 FBG ;SPACE FWD OVER 1ST BLOCK 
44 104414 016762 EAD ,RLNK2 :READ 2ND BLO 
OC35SO 104423 BLKCMe !COMPARE THE READ AND WRITE BUFFERS 


TALL MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE 33 
CZTAOO Pll 23-MAR-78 08:34 T13 TEST SFBG AFTER BSBG 

i453 003SS2 016762 RLNK2 

1322 003SS4 017016 


SE@ 0033 


;LINK TO THE READ BUFFER 


‘ wuerrTe BUFFER 


WLNKe LINK TO T 
| | ENR A DEORE REA EEAEREEREEEERERSEEAHEEEATOSERESORSSROS TEES SS O88 
14S6 ;ATEST 14 TEST SFBG AFTER BSFG 


LO Sg greene yraain ean peepRMNMeTE 


1459 

1 104422 LORV F oF STING 

iver 1By4si REWIND TA RRESE i FS 

es Geers iowi3 170le mere ALN aoe a Las 

ives i iB Be : Shae E Fue BL bck 

1 104414 016762 READ =, RLNK2 ie THE 2h OCk 

ie? o3ei8 ibi23 KCMP iC ete, BND WRITE BUFFERS 
tues BOSE Sele oi Sate WLNKe BUFFER 

1470 H a: Sees CREE Ke 

1471 i kTE REWRITE THE LAST BLOCK 3 TIMES AFTER DOING A WRITE AFTER WRITE 
147. Wf 5, at FT Fa UP ee a AE as la A ot ie Bed 

147 903629 +éT15: SCOPE 

1474 bie737 004012 001172 HOV ; #TST16,SESCAPE ;;ESCAPE TO TEST 16 e roe Te TESTING 

17g B33 1821 017012 WRITE. , WLNK 165 19 =ScERR LE 

1478 osesG 1943 017016 WALT ” WLKNK 

iuao boseue fousie BeBe ee en on 

148 1 4 016756 R R 

idee Bb see4 1paa33 BER mp — {Conan RET ONE D WRITE BUFFERS 
ie? ae ie iat eae, FFE 

1485 ig4si9 016762 READ , RLNK2 : . 

1487 0026 016762 RENKe eth T ng | ilemeichaaes 
1488 003672 017016 WLNKe i LINK TO THE BUFFER 

iq oe ipuais Baie He 

1430 76 : 13 017022 WRITE , WLNK3 SPRATT QV RHE T Bt ock 

14 903704 1p 016766 READ ,RLNK3 ReaD TT 

lug OOa7is | OlerEe Renae SCONK'TO THE READ BUFFER. OUT rERS 
ize Bearke (bias sa IES dies Toren neorres 

1497 003720 104413 017026 WRITE  ,WLNKY :AND WR TE OVER IT AGAIN 

iggs poa7se tBuats o1677 £88 BEAD 

1500 003732 104423 . ake RO RPARE. THE RE WRITE BUFFERS 
HL BEE Bibcs aes HI 16 He Gite ueres 

1503 003740 104416 BSG : BACK OVER T A eck 

1504 003742 104413 017016 WRITE ,WLNK2 :AND WRITE OVER Tt AGAI 

50s 003746 104416 BSBG ; NOW . 

1506 003 104414 016762 READ RLNK2 : REED ve 

1507 003754 104423 BLKCMP ° COMPARE The READ AND WRITE BUFFERS 
1508 003756 016762 RLNK2 :LINK TO THE READ BUFFER 


1457 
14 QO3556 +6714 
12737 003620 001172 MOV aTST1S, SESCAPE syESCAPE To TEST 15 ON E 


SEQ 0033 







TALL MOTION TEST 
CZTADO.Pil 23-MAR-78 


1509 003760 017016 

1510 762 104416 

151 764 104416 

iste Zoe 104414 016756 
1514 16756 

1515 bi Sais 

i213 iguaes | 72078e 
1518 Boe ateres 

1519 OO4010 017016 

1520 

1B 

1Se3 oo4o1e 

1588 tart 12737 004172 001172 
{252 Bowped iovuet 

1527 OO4O26 104413 O17012 
a foe len 

1 104414 016756 
Be ie 

i832 OUT cove 
He gs ith 

1535 OOH0S4 104414 016762 
1239 Bowes oleres 

1538 04064 G170i6 

1239 004070 104413 017026 
1541 104416 

1542 OO4076 104414 016772 
ieua Bou BHiDs ater Fe 

ig Seite Ghceis 

fee Rite tees 17032 
1549 004120 104414 016776 
1550 OO412e4 104423 

1551 004126 016776 

1223 bourse = PAagre 

1554 004134 ibuais 017022 
ee ise ie 

i225 Boutus 1OW414 016756 
1558 OO41SO 104423 

ieee BES Blboes 

1561 OO4156 1044914 o16766 
1562 OO4l62 104423 

1563 OO4164 016766 

1564 OO4166 017022 


t 


CZTAD-D MACYL1 30A(10S2) 
08:34 T1S 


23-MAR-78 P 
REWRITE THE LAST BLOCK 


ag 
NKe 
WLNKe ; 

5 98-9 998 9 J EE EE EE 
REWRITE THE LAST BLOCK 3 TIMES 


TEST 16 
+s SERKRKASSRSKSLASKASKSKHAASAAKAEKAHKAAKEAKKAEHKKARAERHKAAKAAKLRAAEE 


STib: 


OPE 
MOV 
L 


eTST17, SESCAPE 


08:3 GE 34 
3 TIMES AFTER DOING A WRITE AFTER WRITE 


;LINK TO THE WRITE BUFFER 
:BACK OVER BOTH BLOCKS 
;ANO READ THE 1ST 
{COMPARE f T ReaD BAD _MRITE BUFFERS 
sLINK.T T ae 
:C 
LINK T 

OT 


at WRITE BUFFERS 
FER 
ITE BUFFER 


;;ESCAPE TO TEST 17 


e a 
‘ 


AND WRITE BUFFERS 
BUFFER 


READ 
Tre BUFFER 
OCK 
READ 


SELECT OR oN EOR TESTING 
75 “CLEAR. LEADE 
T 


AND WRITE BUFFERS 
BUFFER 


ae 
; ¥ 
3 TO T 
iW a0 
sc T 
3L TO T 
ite oe HRLTE BUFFER 
SORT TE MER 2NO BLOCK 
; BACK . 


te READ AND WRITE BUFFERS 
THE READ BUFFER 


2orro; 
L ham 
FR 


miedo 
i 


3 


z: 
~hnaP 


orrow 
x 
KR-Az 
m 
g 
i 


8 


: 


2 
HBS" 
RE + BUFFERS 
Tre BUFFER 
mi AND WRITE BUFFERS 


BUFFER 
ITE BUFFER 


Papert 
aaB 

goo 
444, 44-4 


Cromrroz 
ORE 


| om ame) 
Fe 
44 


SEG 0034 


* 
AFTER DOING A WRITE AFTER READ 


SEQ 0034 


JO3 


TALL MOTION TEST czTAD- D MACYLI 309A 1052) 23-MAR-7 8 08:36 PAGE 35 SEQ 0035 
CZTADO.P11 23-MAR-78 0 TEST WEG AFTER WRITE ANDO BSFG AFTER WFG SEQ 0035 
1565 tpgesageessesensnesusesnssonsnsesnsnssonsessgnennenenssseensen 

1308 179 04 ‘ Sa enn nena 

1569 Oo 7 ead oo4226 001172 MOV TST20,SESCAPE ;;ESCAPE 10 TEST ON ERROR 

1570 365 Toquze SELDRV LEE? DAVE FOR TESTING 

1571 OO4e0e 104421 REWIND te 

1878 Oo 104413 017012 , WLNK1 ;WRIT OCK 

157 io 104412 WF :FOLL BY A FILE GAP 

1574 OO4%ele 104415 BSFG : BACK R THE DATA BLOCK 

157S OO4e14 104414 016756 ,RLNKI ; DAT 

1258 Oousse dierse Ey scone TO 1 alate 
1578 OO42e4 O170ie *LINK TO THe WRITE BUFFER 

rt . ,jyaggeghotatoenenereresenezerecaracanachinnneneaeenensnsnsnenss 

1581 j jHaseanuaeuneunaunansntnonnansneenexannaenenenernnexasenseneres 

1285 ited 12737 004264 001172 Rov . eTST21,SESCAPE ;;ESCAPE TO TEST 21 ON ERROR 

isa ooNe 3 194uee SELDRY : SEL T RIVE FOR TESTING 

i fees teal 172. aaa BIE Rr PeogsgO® OT 

1588 O04 104416 BSBG He DATA 

1589 Oowese 104414 016756 READ ,RLNK1 READ 

12a; powseo Ole7se RENT te th 10 ab BUeFER On 
1592 O042e62 017012 WLNK1 gi 6 Te READ, UF BUFFER 

2 3 ,jtaganguenenenenenananenanestazsunrenenhenenerncneenenanansnene® 

tegr 904764 o00004 2 a ERE RRR ERE EE: 

1597 004266 012737 o004342 001172 “MOV eTST22,SESCAPE ;;ESCAPE TO TEST ob? ON ERROR 

1598 004274 1guNee SELORV ; SELEC VE FOR TESTING 

1600 So4306 10aGS 017012 WRITE ,WLENKI HHRITE BNE BOCK 

1601 104421 REWINO ;G0 T 

1606 0206 fate 016756 READ ,RLNK1 ; K 

le04 poNaia Oler7Se Bt CON Te T READ BUFFER. © CUFFERS 
tees Goisie Ol7te re EAN 19 The tive BUFFER 

1607 004322 inawie 017016 WRITE  ,WLNK2 gue NOT BLOCK nx 

1609 ited 104414 016762 Rees ,RLNK2 ; Tee SEC OcK 

ieit Boast dveves ay ictte"6 Tre Reet ouectat”™ OUTER 
1612 004340 017016 WENKS *LINK TO tte TTe BUFFER 

tea To ne ae yg a a eee 

tats 342 ae, ee 

1617 then poo? 004420 001172 "MOV #TST23,SESCAPE ;;ESCAPE TO TEST 23 ON ERROR 

Hels oases Bnei ant Hepp gorse For Testane 

1620 004356 104413 o17012 WRITE  ,WLNKI :WRITE ONE BLOCK 








TALI MOTION TEST CZTAD-D MACY!1 30A(10S2) - & PAGE SEQ 0036 
C3thob Pil 3) -nar-78 58.50 935 rest WEG “Te eR RERD A AND perc AFTER WRITE SEQ 0036 

1621 004362 1owwel mare REWIND wile 5 G0 TO ey ' 

igs B84 ifs 33 BLKCNP F ie aie BND a BUFFERS 

1PS¢ ?oi8 NK tC INK i Th 

1626 1 1 WEG de 

1 1 4i3 017016 WRITE  ,WLNK2 ;WR 

1 10441 G : 

i 104414 016762 AD ,RLNK2 ; 

1 Bows! i 4e3 KCMP ; WRITE BUFFERS 

1631 14 1 NKe sLINK TO T FER 

1 004416 017016 WL NK *LINK TO T ITE BUFFER 

1633 3 peegnecsseeneceensenessscnnscanssssensatssasessacsascsssneneness 

1634 ATE TEST SFFG AFTER REWIND AND READ AFTER SFFG 

1635 "LAS EESSERREERRESSEESRESASEAESASESESEASSERSS EEA RERSRASSREREEERER 

1636 OO4420 OO00004 +é123: SCOPE 

1637 2e 0 2732 004464 001172 MOV aTST24,SESCAPE ;;ESCAPE TO ae 

1638 1e94 2 SELDRY i SE ive FoR TESTING 

1 432 104421 WIND 35 

1640 34 igasi3 017012 WRITE , WLNK 1 ;WR 19 K OF DATA 

1642 104413 017016 WRITE ,WLNK2 WR T A Or DATA 

1643 194Nel REWIND :GO T 

1644 10441 SFF : R FIRST BLOCK 

1645S O044S2 104414 016762 READ , RLNK2 ; THE 2ND 

164% OO44SE 104423 KCMP ; AND WRITE BUFFERS 

1647 BOW4ED 01676¢ NK ;LINK T FER 

16 17016 WL NK TO T FER 

164 3 jtepeeguseetennzeeeeesseaneeeersereennbsentennananenseennnnenss 

1650 kTE TEST BSBG AFTER G 

1631 Tee y en cccnnderncecnnccenenannnasoneconqucsncacanasasonoaseese 

16 004464 O00004 $4724: SCOPE 

1653 DOW4G6 0 e732 o004S32 001172 v sTST2S, SESCAPE ssESCAPE T oeuTEF ven ERROR 

1654 La iguze LORY FOR TESTING 

1656 et pada 017012 ote , WLNK 1 igo f DATA 

16S 1guvie WEG :WRIT <= GAP 

1658 104413 017016 WRITE ,WLNK2 :WRIT 

1659 le 104421 REWIND :GO “BOT” 

1660 1% 104417 SFFG : SPACE OVER FIRST FILE 

1661 104416 BSBG ;BACKUP T K 

1662 Boyee8 104414 016756 READ ,RLNK1I :READ THE BLOCK 

1663 Oowse4 Lowes BLKCHP :C T AND WRITE BUFFERS 

1664 16756 NK 1 i LINK T BUFFER 

1665 004530 017012 WLNK1 NK TO THE WRITE BUFFER 

1666 PTTITIITITITITITITITITTT TTT TT TTT TTL 

igee : jATEST 26 TEST SFOG (TER FFG snesaspuncounecs 

1669 004532 o00004 T25: SCOPE 

1670 904534 016737 CO4E06 001172 MOV aTST26, SESCAPE ESCAPE TO aeuEF RROR 

ter eves 1iier mi ye ron TestiNe 

io22 poets 1b 017012 wey —E ,WiLNKI Be A BLOCK 0 o. pore, 

1675 OO4554 104413 017016 WRIT NK 


c04 po 


1677 


1e58 
680 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
i 
1 
1 


SEIRRE EROS SS GRAPE BSB OR RES 


ee ee 
MONT UIL WO 


NNNNANNNNNANNNNNANNNANNNNNNSN 


Rtetettd tut eh tes 





TION rest 
Pil 3-MAR-78 
paieee {par 
ONs72 1O¥4i6 
Oners Ibis 
Oovede Ole7ee 
17016 
10 012737 
1 ath £4 
ieeats 
teary 
i 1 
1 1 
ie 
yy | 1 
104417 
ibe9 
OO46ES4 104414 
OO4660 104423 
OO466e 016772 
OO4664 017026 
OO4666 000004 
604670 012737 
004676 104422 
004705 ats 
Bn718 1DNL3 
ris ies 
0047, imente 
Oo7ee IDNs 
7, 1 14 
0047. 1 23 
004734 0O167S6 
004736 017012 
004740 OO00004 
les 4 012737 
0047 104422 
0047Se 104421 
754 104413 
004760 104412 


Nf MACY11 398 1052 ) res? crac 


016762 


016772 


004740 


017012 
017016 


016756 


00S016 


017012 





SFBG 
REWIND 
ere 
BSBG 
READ 
BLKCMP 
RLNK 


»RLNK2 


a 
"BerPR eero 


03 


ct even BEock 
eA THE 


T 
Last Bt 1 Bock, WRITE BUFFERS 


hie T ie REA BUFFER. 


NK 
dussenatoetocnrerarnsteensenseressensehsnnscnsensnesnnnannenss 


i ETEST 26 TEST SFBG AFTER SF 
OR Se eee 
? v eTST27,SESCAPE ;,-.-°"~ ** TEST 27 ON ERROR 
— SELORW , i Seug ee oRivE FOR TESTING 
ny E  ,WLNKI UE Lock OF DATA 
WRITE » HLNKG : WRIT 5 BLOCKS OF DATA 
WATT * WLNKY 
cErE Once OVER T ST FILE 
eres SPREE OVER TES bfdck 
uy 8 T OF 
BLKCHP meee iC he fees RE Ko OND UR WRITE BUFFERS 
RENKS iLEN 18 THE GRITE BUFFER 
,:terennatonewensnnansnsnesesnsesnenesesbatieensnnmenestonensnes® 
Fog pipernn panna epceneapeagmeneneriganes 4: 
001172 MOV #TST30,SESCAPE ;;ESCAPE TO 
SELDRY i SE SELECT, ve" FOR TE TESTING 
MATE ,WLNK 1 thet BLOCK , OF DATA 
WRITE , WLNK2 ey BECK OF DATA 
SFFG : Seot aoa FI 
3 SRC OF 2ND FILE 
G ; BACK OF _2ND FILE 
eas Of ist FILE 
BLKCHP . iC abe WRITE BUFFERS 
WLNK1 = ae 
oo aE 
ee a ee ee 
001172 MOV aTST31,SESCAPE ;;ESCAPE To res oaivon RROR 
SELORV i$ IVE FOR TESTING 


NO 
E 


I 
WRIT 
WEG 


»WLNK1 





! SURITE ONE BLOCK OF DATA 


tWRITE A A FILE GAP 





SEQ 0037 





TALL MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE 38 SEQ 0038 





CZTADD.P11 23-MAR-78 08:34 T30 TEST BSBG THRU A FILE GAP SEQ 0038 
1733 004762 104413 017016 WRITE ,WLNK2 ;WRITE TWO BLOCKS OF DATA 
1738 tae ise 017022 WRITE *WLNK3 on “ere 
173 i 7 ts + SO Ace OVER 1ST FILE 
12 004 iguvied SFBG \ i SPACE OVER 1st BLOCK OF 2ND FILE 
1738 i if Bege : BACK OVER 1 Bt eek 
1740 104414 016756 READ ,RLNKI % ; 
174 ts o44e3 BLKCHP ; THE READ WRITE BUFFERS 
174 1 167 NK1 3LINK TO Ti READ FER 
174 4 01701 WLNK1 *LINK TO T ITE ER 
1744 553-8 J 9 9 9 J RE 
1745 ;#TEST 31 TEST BSFG AFTER BSBG 
ea 4 ee 
1 eet 005070 001172 ° Rov eTST32,SESCAPE ;;ESCAPE TO TEST ERROR 
Fa 3 1oW4e LORV : SELECT, DRIVE FOR TESTING 
178 Bats 017012 RR —E  ,WLNKI 68 te BLOCK OF DATA 
1 10441 WEG :WRITE A FILE GAP 
1753 194443 017016 ITE , WLNK2 jWRI TE A BLOCK OF DATA 
1788 104417 SFFG i SPACE OVER Fl Fs - we te 
15288 1padee BeBe BACK OVER BLOCK 
i529 tovaia 016756 READ RLNK 1 : READ ta d K TAPE 
133 i 43 BLK : i CoRPAAE re ab ano WRITE BUFFERS 
1761 016756 RLNK1 s LINK TO THE READ BUFFER 
1762 017012 WLNK 1 *LINK TO T ITE BUFFER 
ison ; PERRO ROREOROBENORRORROOREEEERESREERERSRennEnSEneacasensente 
1765S MUTOTTIT OT TT TT TTT TTT tt iri iti iti t iii i titiiiiit titi iii is 
ie? i Ole7 005134 001172 TSte: SCOPE #TST33, SESCAPE ESCAPE TO TEST 
1768 eaten Tba4ze BOY ORV ; ag :SELEET oRive” FBR CESTING 
1769 005102 1044e1 REW NO ; 0 “CLEAR LEADER” 
1770 .005104 104413 017912 ITE ,WLNKI ;WRITE BL 
1771 OOSi10 104412 WE WR A FILE GAP 
1772 O0Si1 104413 017016 WRITE  ,WLNK2 :FOLLOW WITH ANOTHER BLOCK 
1355 005116 10441 BSFG ;BACK UP 1 FILE - 
tyre Besise IBwts eS Yer aa 
1775 1 104414 016756 ,RLNK1 : ST BLOCK ON TAPE 
1776 905126 Lowes KCMP :C THE RE BND WRITE BUFFERS 
17 50513 16 NK1 ;LINK TO T FER 
1778 005 3 0170ile WLNK 1 ‘LINK TO THE WRITE BUFFER 
1779 Witt ttle 
1780 :&TEST 33 TEST BSFG AFTER SFFG AND SFFG AFTER READ 
1781 = + SERHKERSSEREEREEESRKARAKAAAHHKKAAAKARAREAKAKAHKKKRKKRKERKARRRRREE 
1782 005134 o00004 +$T33: SCOPE 
1783 005136 016732 005216 001172 HOV wTST34,SESCAPE ;;ESCAPE TO TEST oft ven ERROR 
iyee Doeive io4usT REINO eS. 
1736 poeise 1ou473 017012 WRITE ,WLNK1 :WRITE A BLOCK OF DATA 
1787 005154 104412 WEG ‘WRITE A FILE GAP 
1788 005156 104413 017016 WRITE  ,WLNK2 :WRITE A BLOCK OF DATA 










NOS 
So man-7— Serag O MACYLL 30g Ose) | ee ORG BFTER SFFG AND SPFG AFTER READ SEQ 0039 se 0039 
421 REWIND £9010 oreh, Pai 
Bore 5 eee  BYEB CHANING OF IST FILE 
% 016756 READ, RLNK1 T K 
423 KC WRITE BUFFERS 
: URITE BUFFER > 
ake ON ENO FILE 


 COnbane t Ad eho wai TE BUFFERS 


E BUFFER 
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e2thob. Pi 





016762 Sep »RLNK2 
BE Res 


WLNKe ;LINK TO THE 
MTTTTIVITITITIT TIT IiTtitiiiiitiiititiL iLL LL Labo 


Wee 
OO e+ OO eee 
xe 
ray) 
po 
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aa | 
Tr onurr onane 
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aden 


;#TEST 34 TEST SFFG AFTER SFFG 
+s PELSRSRSHRAKERRAKRRKERHRAETEKEAAK ALEK ARASLSSSSSSSSSSSSSESSSLELEAE 


SeapeeRRRSe la aadcasas 
é 





1 

i 

1 

: 

1 

i 

i 

i 

1 

1 

1 

1 tST34: SCOPE 

1 ited oe 099? 00S274 001172 MOV wTST3S,SESCAPE ;;ESCAPE TO TEST 35 ON ERROR 

1 DOSe 1 ge L ; Le T DRIVE FOR TESTING 

1 00 >< t 4 WIND ; T 

1 ee i i 017012 WA E ,WLNKI jHRIT B BLOCK 

i Boss40 1Btai§ 017016 Unf TE , WLNK2 tHRETE 8 K 

1 1 We :WRITE A FILE GAP 

1 te BOSE4G 1 13 017022 WRITE ,WLNK3 HRI A K 

igia Soeseq iossel REMIND eRe Bao 

1815S 005256 104417 F ; 

1818 DOSS ipaai? F ; R RO FIL 

1817 OOSebe 104414 016766 , RLNK3 ; BLOCK OF 3RD FILE 

i819 poeese aleve RINGS CoN T READ BUFFER. © CUrreERS 

1820 005272 017022 WL NK ‘LINK TO THE WRITE BUFFER 

18s 55 3969-8 J 9 9 9 9 9 9 0 A EE a a 

1 :kTEST 35 TEST SFFG AFTER SFBG 

ies? 74 go0004 aia <parameter: eine tbats sae ceases enecatmpibitis st a: 

1825 ppesce 012737 OO0S3SO0 001172 “MOV #TST36,SESCAPE ;;ESCAPE TO TEST 36 ON ERROR 

1828 005304 194uee SELDRY iBo-10 ~Bor FOR TESTING 

1855 este 1 Baars 017012 Rat Te ,WLNKL ert A BLOCK 

1829 905314 104413 017016 WRITE ‘WLNKe sHRITE @ BLOCK 

1830 10441 WF G :WR ) 

1831 Oeics ipaai3 017022 WRITE , WLNK3 sMRET a K 

1835 Buuei REWIND He 1: “BOT™ 

1 F ; RT ST BLOCK( ST FILE) 

ig3e Bgessa §«tbuui? page 5 OR ee TEBE CTRINING OF SND FILE 

1836 905338 10414 016766 READ ,RLNK3 RE T BLOCK OF 2RD FILE 

104423 KCMP 3C T AD AND WRITE BUFFERS 

1838 005344 016766 LNK3 :LINK TO T AD BUFFER 
005346 017022 WLNK3 *LINK TO THE WRITE BUFFER 

1840 WTIIIiiiiiiit itil titi 

183 jATEST 36. eanece ve Bea, Ba 

1843 350 $6750" SCOPE REREKAASAEAAKAAKAKAKARKKKAKKAARKKKERARKKRARRKKRRAE 

1844 tats 352 6 To997 oo0s422 001172 MOV #TST37,SESCAPE ;;ESCAPE TO TEST 37 ON ERROR 
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36 TEST WFG 
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i ATE 


Bri rae 


NK . 
jagpenatatnteeenuneseueuasgussuansensuabiauseats 
TEST WRITE AFTER SF 
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i, 


TO 
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SEQ 0049 


;SELECT DRIVE FOR TESTING 
;WRITE 2 BLOCKS 


8 BLock 


warre BUFFERS 
FER 


aoe a peeeeURAGREOGRCRSREEREREDSSSSHHQEREEEAHHEQERERRRETEEEEES 


+6137: SCOPE 
MOV 
L 
Wd 


a 
J 


BLKCMP 
NK 


SATE 
tér4 


saan 
add gy 


ate onene 


wo 
gaaee 
KROOQOOOOOOO- 


EPER 
rT $s 
eS 


WIND 


U 


» ENKI 
>» WLNK2 


, WLNK3 


»RLNKI 


»RLNK2e 


ele 


WLNK 
ie: Ce EE 

T 40 3 MULTI SPAC T SFFG AFTER BSFG 
jtetneasenauasrerarsetecsuuevorenonsesanaesarsnearaenanaeneny: 


STST4Y1,SESCAPE ;;ESCAPE TO Nad 4 


BL 
3FI 
Ae 
L 
SO BOT” 


rro 
> 2 
RR 
4a4D4 


ig 10 


A BLOCK 
Ha 
LE GAP 

GAP 


Ae) 
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ee 
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Bie 


WTSTHC,SESCAPE ; ;ESCAPE TO Oe pee TESTING 


FILE 


Be BUFFERS 


ive oN FOR TESTING 


wat TE BUFFERS 
FFER 
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TWO BLOCK FIL 


eTST42, SESCAPE 


WLNK 1 


* WLNK2 


,WLNK3 
» ALNKY 


»WLNKS 
» WLNK6 


»RLNKS 


»RLNKS 








136. PAGE phe SEQ 0041 
S---MULTI SPACING FUNCTIONS SEQ 0041 


3 HE bebebebeheh debebet tehh Ltd dL tah Eth hhh bdebahahchohehahatedbabeb-b-heh-teh-bebeh-b--h-heh-teheheheheielelel 
jRTEST 41 THO BLOCK FILE 
©  SHESHRRRREEREREARE RHRRE 


S---MULTI SPACING FUNCTI 
90 HE AE 4 AE 0 A SE A EH 0 a a aa 


sHESCAPE SELECT DAVE FOR TESTING 


3G “B80 
Gere A 2 BLOCK FILE 
;WRITE A 2 BLOCK FILE 


;WRITE A 2 BLOCK FILE 


BUFFERS 


at 
Nat BRO FILE 
T FILE 
T ae WRITE BUFFERS 
TO T FER 
OT ITE BUFFER 





WLNKS ;LINK T 
3 conqnascenennnensenessonenetenscnensnscdeaseateselessescesnaens 


SPACING & TEST SFBG AFTE 


STST43, SESCAPE 


» RLNKY 


»RLNK1 


gig > jn la tedameipnaaeen cae aieiciaiceancea cantata coacseatgtain rosie 
;;ESCAPE TO TEST 43 ON ERROR 


; LE TA DRIVE FOR TESTING 
:WRITE A 3 BLOCK FILE 


;WRITE A 2 BLOCK FILE 
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REISER 
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23-MAR-78 08:36 PAGE 42 SEQ 00%e 


MULTI SPACING & TEST SFBG AFTER READ 


ite os mo Te ae pa" BUFFERS 
ml Ota ec NE, CUFFER 


AND WRITE BUFFERS 





NK FEP 
ve Rite oyefes 
FG G FILE 
Ad » RLNKY 2n0 FILE 

ag T Bren BUFFERS 
NK4Y t ITE FER 


WL sLINK T 
sjageeegeeernaecnaseaennaenseusocnssssnshinseanennsaesasrsentszs® 


WO BLOCK FILES--MULTI SPACING & TEST SFFG AFTER BSBG 


eRKONTaEEDENAGNRONHnOONGHSOENOONREEEROHAOEEOSESSEROEEREEEOEEOE 


SCOPE 
eV ory eTST44, SESCAPE cont SEL ECY OR te eae ce OE STING 


WRIT , WLENK ‘RITE a : BLOCK FILE 
ay , WLNK 
WRITE ,WLNK3 ;WRITE A 2 BLOCK FILE 
1d Ne » WLNKY 
WRITE » WLNKS ;WRITE A 2 BLOCK FILE 


TE  ;WLNKG 

IND ;B0T 

8 ;SPACE OVER 3 FILES 

4 ;BACK OVER 2 FILES 

;BACK TO 2@ND BLOCK OF 1S 


i sms mci & 2, Fit 


KCMP 3C Re BUFFERS 
NK3 ;LINK T FER 

NK3 sh IN TO THE WRITE BUFFER 

FG ; TO BLED 

AD RLNKS ;READ 1ST_RE OF 3RO FILE 


ER 


KcMP ’ 3C T WRITE BUFFERS 
ree iti 1 THE fees, Ourree 


ONE BLOCK FILES---MULTI SPACING 


ee ee 
ey @SEOP , SESCAPE ;ESCAPE TO sEOP ON E 


RROR 
8 Léger RA IVE FOR TESTING 
WIND 
WRITE »WENK1 ;WRITE A I RECORD FILE 
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017016 
017022 
017026 
017032 
017036 


017002 


016776 


016766 


016756 


6 Coe oee 


INE BLOCK FILE 


Fipubc pub. pub. bab.spaba spl 
ae a ee a ee 
mmm mM 


OOoOr~- 
é 


w 
oat 


SFFG 
SF 


»RLNKE 


»RLNKS 


,RLNK3 


,RLNK1 


PAGE 43 
3o_ fue I SPACING 


;WRITE A 1 BLOCK FILE 
;WRITE A 1 BLOCK FILE 
;WRITE A 1 BLOCK FILE 
;WRITE A 1 BLOCK FILE 
;WRITE A 1 BLOCK FILE 


Seook OVER 280 FILE 
+ OAcE OVER 3RO FILE 

: SPAC R 4TH FILE 

5 SPAC OVER STH FILE 

: SPAC R 6TH FILE 

:NOW BACK UP AND READ IT 

; COMPARE T AND WRITE BUFFERS 
;LINK T THe RED BUFFER 

:LINK TO THE WRITE BUFFER 

:BACK UP TO STH FILE 

;AND READ IT 

:COMPARE THE READ AND WRITE BUFFERS 
:LINK TO THE READ BUFFER 

‘CINK TO THE WRITE BUFFER 

:BACK UP TO 3RD FILE 

;AND READ IT 

: COMPARE THE READ AND WRITE BUFFERS 
!LINK TO THE READ BUFFER 

‘LINK TO THE WRITE BUFFER 

:BACK UP TO 1ST FILE 

;AND READ IT 

:COMPARE THE READ AND WRITE BUFFERS 
‘LINK TO THE READ BUFFE 

‘LINK TO THE WRITE BUFFER 


SEQ 0043 


SE@ 0043 
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2056 
2057 
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CZTAD-D MACY1I1 308 1952) 3-maR-79 08:36 PAGE 44 SFQ 0044 
08:34 Pass ROUTI SEQ 0044 
.SBTTL ENO OF PASS ROUTINE 
i +s SEESKRRKESRARASSEREEEEEEHAEEEAAAEAAAKASSAAAEESHFAERAELHKLAREKAKALKSE 
iIN REMENT pass" PASS NUMBER (S$PASS) 
sate HE ITOR $0 To IT 
FY ape 5 t6 : 
IE Ir i8,0 SIRED TO. TO Have cy BELL INDICATE THE “END OF PASS” LOCATION 
SEOP: 
SCOPE 
001102 CLR STSTNM +i ZERO THE TEST NUMBER 
001170 CLR in| S ERO THE NUMBER OF ITERATIONS 
001100 INC PAS BP Rol HE PASS NUMBER 
100006 BIC #100000,SPASS j; A NEG. NUMBER 
DEC (PC)+ 
SEOPCT: .WORD 
BGT SDOAGN ;;YES 
MOV (PC)+, a(PC)+ ::RESTORE COUNTER 
SENDCT: .WORD 1 
SEOPCT 
006451 TYPE : 3; TYPE “END pass” 
006446 TY NULL :: TYPE A NULL CHARACTER 
oo004e SGET42: MOV ds42,RO i :GET MONITOR ADDRESS 
BEQ SDOAGN :;BRANCH IF NO MONITOR 
RESET ::CLEAR THE WORLD 
SENDAD: JSR PC, (RO) :;G0 TO MONITOR 
NOP ;; SAVE ROOM 
NOP ;;FOR 
NOP ::ACTI1 
SDOAGN: 
JMP ecesie ; ; RETURN 
SRTNPD: .WORD STA 
377 SENULL: | BYTE ;NULL CHARACTER STRING 
oua2die SENOMG: .ASCIZ “tes!19) x0 pass? 
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CZTALO.?11 23-MAR-78 08:34 END OF PASS ROUTINE SEQ 004s 
2033 H 5 He aE HE HE He He He HE He He aE HE ES EH HE HE a HE aH HE HH HH aH REAEKAAAAFHSAH f 
303s *SBTTL ROUTINE TO EXAMINE ORIVE(S) FOR AVAILABLITY 
2097 ;CALL: 

2038 . MOV #ORVKEY, RO 

20939 : JSR PC, J8EXAM ;R1 IS DESTROYED 

2100 ; NORMAL RETURN 

gi01 : ERROR RETURN 

€103 006464 013701 001220 EXAM: MOV QaTACSL,RI ;PICKUP THE “CONTROL & STATUS” REG. ADR. 
104 006470 il CLR (R1) fo Fo FUNCT ION="WFG” 
2105 4 27 000101 CMPB #’A, (RO) XAMINE DRIVE “A”? 

6108 4 4 BEQ ee Y 

210 711 ooo400 S WUNIT, (RL) iSEt CT DRIVE “B” 

¢108 opesis 0817 1 oo0040 1S: BIT #READY, (R1) WAIT ON READY 

5196 i3 711 TST (R1) 5 ANY ERROR? 

2111 14 goges BPL 4s. 

eile g i 001000 BI #OFFLINE, (R1) ERROR Bue TO “OFF LINE”? 
211 01 NE :BR IF Y 

2114 11 010000 BIT #WRTLOCK, (R1) :ERROR DUE TO “WRITE LOCK"? 
2115 906539 4 Be $ :BR IF NO 

2116 1 3353 000201 172400 fPB #81T07!BITOO, ISWR :"READONLY” SELECTED? (RDIPAS) 
2117 14 BEQ 4s ;BR IF YES 

giig 2 e777 000203 172370 cnr 881T07!81T01!B1T00, SHR ; i CROgPAS 

2120 Se oo00403 BR 3s TAK THE ERROR EXIT 

giel poeees G3e711 o20000 2s: BIT #LEADER, (R1) ee mes TO SCEEAR LEADER"? 
21e3 boeser 062716 o00002 3$: A #2, (SP) Take RROR RETURN 

2le4 006566 000207 ae: RTS pe X ?RETU fi — 
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we rasmus cb cand <b SOUSA GOMES ree OEIC NCTE & & Ek Ee EE © & ubeubenabaredaenarnenrnanene 
SIarVoad ZINA SSSVER LOR SSS VER LONE SSAA ESHH-GSOVER LOWE SVS VEN 
4 8 
be 
F- 
o 


HOY 


CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE 46 SEQ 0046 
08:34 SCOPE HANDLER ROUTINE SEQ 0046 


.SBTTL SCOPE HANDLER ROUTINE 
[TRRRESEN RRR RT ERR ERNE RNa e eRe Tee eee EU eee ILL INCREMEN 


jATHES LOB THE ieee eet reine INT INTO T she BL ob y REGS (DISPLAY <?: 0) 
Te, saith eft PRovit BY THIS TROUT INE AR 
teu 


eSul isk treft 1 IONS 


SCALL 
3% SCOPE ; ; SCOPE=IOT 
SSCOPE: 
CKSWR ;;TEST FOR CHANGE IN SOFT-SWR 
17234 TSTB aSTKS ;TTY FLAG UP? 
BPL 100$ :BR IF NO 
RDCHR :GO GET ONE. CHARACTER FROM TTY 
000003 CMPB H+ yl 31S : ac 
LOOP ‘85 6 GET “TEST" AND “SCOPE LOOP” ADDRESSES 
100$: TST (PC)+ L ON TEST? 
LOOPKEY: 0 
BNE SOVER :BR IF Y 
o¥0000 1172312 1S: IT ¥B1T14, SHR iapbete Peete Stest? 
:geeeeSTART OF CODE FOR THE XOR té oe 
$xTSTR: BR 6$ NG ON THE “XOR™ TESTER CHANGE 
:iThas Inet TION TOA W NOPE P=240) 
ooo004 MOV DSERRVEC,-(SP) 3 TENTS THE ERROR. VECTOR 
006656 000004 MOV “Ss geERRVEC >;SET FOR TIMEOUT 
177060 TST aal? 060 He ne XOR? 
000004 MOV (SP)+, Q8ERRVEC 3;;RES THE ERROR VECTOR 
ede Be BR 
Ss: MP +, (SP)+ 33 ACK AFTER A TIME OUT 
oo00c04 nov )+, QBERRVEC ;;RESTORE ERROR VECT 
6S: ; seees OF C FOR THE xor’ te Enocese oer. Some 
001103 2s: ae PRE E 5 se a) RROR OCCURRED? 
001115 001103 ao SERMAX, SERFLG MAX. ERRORS FOR THIS TEST OCCURRED? 
BHI 33 ;;BR IF NO 
001000 172226 BIT agrT0s, , aSWR He con ERROR? 
001110 001106 7s: mov SLPERR, SLPADR He r Looe ADDRESS TO LAST SCOPE 
001193 4$: CLRB SERFLG +: ZERO. THE ERROR F LAG 
001170 cLR STIME He LEAR TH NUMBER OF LTERATIONS TO MAKE 
1 HA THE NEXT T 
004000 172174 3S: BIT #B1T11, 9SWR Har de ve BIT iTe ERATIONS? 
001100 act $PaASS 5 IF FI 
BEQ :} rere IONS 
001104 INC CNT : } INCRE Bry ATE ON COUNT 
001170 001104 CMe STIMES, SICNT ::CHECK T pen OF I ERATIONS MADE 
GE OVE ::BR IF MO TERATION REQUIRED 


ee ee + ——_—_— = 


IO4 
T T T TAD- -MAR-7. : PA ? 7 
Ms bonop ion ve Sh -maR-78 6:59 —e SOO AP ANDER ROUTINE. ” wats cereicgale SEQ 0047 
1S: #1, SICNT 
MOV SHKCNT, STINES 
SSVLAD: INC TSTNM 


Ss 
RROR ADDRESS 
ON NEXT TEST 


2 
é 
e 
e 
e 
e 
e 
e 
e 
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CZTADD.P11 23-MAR-78 08:34 SANDLER ROUT INE SEQ 00468 
e131 .SBTTL ERROR HANDLER ROUTINE 
133 ; TORRE ERNE RRR T Ne eT eRe eee ee eee eee eer ee eee e RON COUNT. 
g133 THI ROUTINE WILL b INCRE NT THE ERROR FLAG AND THE ERROR COUNT, 
e195 ;#SA AND THE ADDRESS OF THE ERROR CALL 
2137 THe e180 ries Pr BY THIS ROUTINE ARE: 
2199 saSuiS = be RROR TYPEOUTS 
ge00 :# =] 
201 ;* =] u 
e202 3 L 
3203 :% ERROR N st AND N=ERROR ITEM NUMBER 
2205 007046 SERROR: 
2 007046 CKSWR ;; TEST FOR CHANGE IN SOFT-SWR 
é 007050 MOV TACS , QUSREGO ; SAVE THE raid STATUS 
2208 4 MOV TADS, as EG1 AVE T HE DATA UFFER 
2203 rsTe aTAC itr “XFER REQ” Re UP KNOCK IT DOWN 
2211 007064 MOVB #ILBS,aTACS 
seis tr dab 
2el 100$ IT Y,aTACS ;1S READY SET? 
eel4 101§ BR IF YES 
2e15 1 RESET : REGAIN CON ROL 
2216 007102 0613714 MOV JeSREGO, ATACS :REST HE TACS 
2217 7106 101$ CMP (SP)+, (SP)+ :POP THE ST 
5518 iia — Bee os + REE OOP ING? 
2220 907116 11 001172 MOV sess SESCAPE ;SETUP FOR MANUAL ESCAPE 
2221 122 6616 177774 102$: MOV sash? (SP) :GET PC+ OF ERROR 
gece 007126 001103 $: INCB LG ;;SET THE LAG 
sees 007 13e BEQ 7 Bee LET THE FLAG GO TO ZERO } 
2e 1 001102 172000 MOV STSTNM, DOISPLAY ISPLAY TEST NUMGER R AND ERROR FLAG 
2225 148 hha 002006 171770 BIT . IT10, ISWR BELL ON ERROR” 
22. ig? o1 001174 Pee BL iN me 
1 O01112 1S: INC 56 HE NUMBER OF 
sec? gorge 1eeF37 cain nov (SP) RRPC ERROR ENSTRUCTION 
2231 1 1 171716 001114 MOVB SITEMB ate IP THE ERROR ITEM CODE 
2232 643535 620000 171730 BIT T13, OSWR $i SKI PT our TF cE 
2233 1 1 BNE g a5 | PT OUTS. 
2c 1 9g 007276 J C, TYPERR :;60 TO ERROR ROUTINE 
ee > a 1 TYPE , SCRLF 
5535 Bors 777 (171712 s)orst aswR T ON ERROR 
Bn fires ieee | &, & rt Of Bias 
2240 007232 204406 CKSHR : TEST FOR CHANGE N SOFT-SWR 
seit rex 030775 001000 171676 3S: BIT 881709, aSHR i LOOP, ON ERROR SWITCH SET? 
2243 7244 013716 1110 MOV SLPERR, (SP) HH TURN FOR LOOPING 
2244 007259 005737 1172 4§: TST SESCAPE :;CHECK FOR AN ESCAPE ADDRESS 
402 BEG og ::BR IF NONE 
716 001172 MOV SESCAPE, (SP) ::FUDGE RETURN ADDRESS FOR ESCAPE 
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022737 006432 o0004e2 
001001 
ooo0co 


o0000e 


6$: 


KO4 


23-MAR-78 08:36 PAGE 49 
ERROR HANDLER ROUTINE 


pees ae 
6 


;;ACT-11 AUTO-ACCEPT? 
;;BRANCH IF NO 
;;YES 


; ;RETURN 


SEQ 0049 


SE@ 0049 


LOY 
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CZTADO.P11 23-MAR-78 08:34 ERROR TYPEOUT ROUTINE SEQ oosO 
e253 ; . Wig ROUTINE WILL TYPEOUT THE ERROR MESSAGES 0 00° 
E254 " eae. p THIS ROY ree Wily WY TYPEOUT THE ERROR he ‘ . " 
e508 iB4uot Rue FUNCTION B ING pERFORHED 
2257 7304 O00000 . MFUNC: /™ MESSAGE POINTER GOES HE 
3] i 16273? urtatees 001204 sue here got ee THE MAIN FLOW PC 
001114 MOVB eesit MB, RO T M INDEX 
ie sg a! We Hee 
a O IT wi Le WORK FOR 
. SERRATE RO ‘ro THE TABLE POINTER 
O)+,18 ;PICKUP_“ERROR POINTER 
1S: NPE sae ES ROTTER” GOES HERE 
s cs 
MOV (RO)+,2S j PICKUP “para Heaven” POINTER 
i. Tree 
2s: 0 aha Pelee re GOES HERE 
35: MOV (RO)+,RO :PICKUP “DATA POINTER™ 
007366 00 - BNE , eae i1F RE IS DATA TO TYPE GO DO IT 
g ete 304903 001291 TYPE pRcrLf :T P A CARRAGE RETURN&SLINE FEED 
07400 Ss: s }RE 
e280 007400 013046 MOV @(RO)+, -(SP) 5 3 SAVE (RO)+ FOR TYPEOUT 
g 40B TYPOC aaa ar Er aOCTAL AS ASCII(ALL DIGITS) 
2284 007406 001770 BEQ 4§ :BR_IF YES" 
2285 10 104401 007416 TYPE 6S :TYPE 2 SPACES 
2286 7414 771 BR $ 
2287 007416 000 S$: ASCIZ 7 / ASCII STRING OF 2.SPACES 


020040 ; 
2288 007422 - EVEN 
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CZTADD.Pi1 23-MAR-78 08:34 ERROR TYPEOUT ROUTINE SEG 005i 

5 5 90 SE JE A SE aE AE JE 0 AE JE AE A a aa aa a a a 

ba .SBTTL ROUTINE TO ASK THE OPERATOR WHAT DRIVE(S) TO TEST 

re el RETURN ee ;NOTE: RO AND R1 ARE DESTROYED 

ea? pore ApsHo4 0151.38 ASKDRV: lype altsepey ;<CRLF>“DRIVE(S)? 

2299 007432 104410 ROL IN TA 

Saar Seeds PAeS78 Yn $ap’*R° Bs Saver eb EPS regret 

2302 007440 001425 é BEG apevEgy - ;8 

S303 BaSauE 138716 BBATor . LOOP: cwre a8 ‘ ;WAS ORIVE “AQ” SELECTED? 

: tiedel nove RO} +, (RLD* 88 IF KEY FOR DRIVE “A” 

g 0 lez 000102 NOTA: CHEB 8. 4aro Ive “Bg” SELECTED? 

e310 i nove (RO}+, (RL)+ iB KEY. FOR DRIVE “B" 

2312 007472 122710 oo000s4 NOTS:  CMPB 854 ;WAS_A COMMA TYPED? 

Sag SR re Meee Bend rh conn 

2315 Qu750e 1057 0 NEXT:  TSTB ; TERM naroR? 

2316 i Q eRtr te ve 

231 007508 Gee701 001242 CMP SORVKEY +2, Rl i Frio Ives SELECTED? 

2313 Og7s18 1 001200 NOTLGL: PPE a8 § ae INPUT DETECTED 

737 001240 EXIT: TST DRVKEY IVE SELECTED? 

aes Sirese Bisse ge fit BPO 

5352 ; + EERASEEKHKAAREAEKRAAEAASSKAEKAAASRAEEAAKAAEKFRARAKAKRKARARKARRAKEE 

cus Se pc, aunenson 

329 ‘ : 

2330 re rake 015152 a TYPE RRScASK Tacs? 

e 12600 MOV (SP)+,RO ;PICK UP THE OCTAL NUMBER 

eed Bo7eie beogs 160000 ch R , #160000 ; MAKE Sune” 199s A Bue ADDRESS 

MOV #TACSL ; TOE_TACS 

fe rn ee eae 

2341 . 

2342 007602 0137 1224 001226 MOV #TADBL , @BTADBH ;SET UP TADS UPPER 

goa Hiei Ges: RHE os, he TR Roe 


NOY 


NE 
F 
ST BE TERRINA TED BY Ad OF ALL O’S 


MU 
ERROR RETURN ;RETURN HERE IF ILLEGAL CHARACT 


TAD- Y11 30AC ) 23-MAR-7 :36 P 52 SEQ o00S2 

CothoD | pig ves -nar-78 6:58 tse: ROUT TNE TO input cer, DER: AND VECTOR ADDRESS AND PRIORITY SEQ o00S2 
34S 007620 1044 RDOCT 
3 , e00 beg rt RO 
ne 001000 cre R , #1000 ;MAKE SURE ADDRESS IS IN VECTOR AREA 
2356 a4 1 001230 AB RO, QeTAVEC ;SAVE AS VECTOR ADDRESS 

44 ; V RO; JeTAVEC+2 
es 1 ret cs: TYPE , MSGPRI :ASK FOR PRIORITY 
3e¢ ee sr (SP)+,RO 
3338 4 BEQ if “ ;IF “0” OLD VALUE 
5 sans? co0ce7 ch 07 ; MAKE ITS VALID 
33 ares fuse see A put INTO HIGH BYTE 

ASR RO 
S3e2 74 ASR RO eNTO PROPER 
: 177437 BIC 8#C< 3402 RO ee PRIORITY BITS 
Site 10 O49) 015204 6S: rere ROtaes 
8 4 b 001220 , MOV tacsc -(SP) SAVE TB ieee FOR TYPEOU 
3] 1 ‘ TYPOC a +360 E--OCTAL RECT I TALL DIGITS) 
es 007756 Ors7uG Barssa move TAOBEe-«sP) : SAVE 7 OR TYPEOUT 
3 32 i TYPOC weet: :;G0 YPE=~OCTAL ASCIICALL DIGITS) 
0440 ° = 

2378 Bea a0 b037u6 paTss6 MOV TAVEC, -(SP) i 3 SAVE TAVE FoR TYPEOUT 
2 007744 1 : " TYPOC ionens 3360 TYPE--OCT 7h3s CIICALL DIGITS) 
$35¢ por ee8 bi 3746 Baissea MOV tAPRIO.-(SP) ;;SAVE TAPRIO FOR TYPEOUT 
2 104402 TYPOC :;GO TYPE--OCTAL ASCII(ALL DIGITS) 
g 1044 015246 TYPE , MSGOK : "OK?" 

4 1 ROCHR GO READ ONE CHARACTER 
2379 12600 MOV (SP)+,RO :GET IT 
2380 700 oo0015 CMP #15, RO : 3 IT “CR”? 
2381 7774 1406 BEQ 7 ;BRANCH IF YES 
2382 007776 27 000131 CMP #’ Y,RO 21S IT “Y"? 
383 ot 001403 BEQ a iT WAS 
384 Ol 104401 001200 TYPE QUES :TYPE "7" 
e285 010010 000651 BR $ :AND LET HIM CORRECT THEM 
cur plaice gpsem 01se54 73 TOE ko metoR ac 
FA Bibose 207 RTS he AND RETURN 
2389 
aah 3 LBessesngeegevssnsesansenennsssnessssseseesesee ete oan 
33¢ i this ROUTINE WILL CHANGE AN .ASCII STRING TO AN OCTAL NUMBER 
sot } REGISTER Rl MUST BE INITILIZED BEFORE ENTERING 
5328 >CALL: 

; JSR R3, I#AZOCT ;CALL THE ROUTI 

2398 : POINTER ;ADDRESS OF THE FIRST CHARACTER IN THE STRING 


rs 


Bee 


De ee be ba be 


PEP Pee eee ee 
PONHSosveusuue 


BOS 


T TAD-D MACY11 30A(10S2) 23-MAR-78 O08: PA SEQ 0053 
Ua ve3)-naR-78 58:58 : ROUTINE TO C AN nee HT STRING TO OCTAL " ~—- SEQ 0053 
. ; TRING TO LONG 
; NORMAL RETURN + Oe TRL hineeR Is tN R1 
MOV RO, -(SP) i SAVE RO 
(R3)+,R : PICK THE POINTER 
Hoy CRS) . : MAX. OF CHAR.’'S ALLOWED 
ee ° ee 
DEC (PC)+ :COUNT THIS CHARACTER 
BLT 4s ;BR_IF TO MANY CHARACTERS IN THE STRING 
CMPB (RO), #’0 :CHECK THIS CHAR. IS BETWEEN 
BLT 4g :0 AND 7 
gre Gg? 
AIC #tC7, (RO) ;STRIP AWAY THE ASCII CODE 
es Hie :POSITION THE FOR THIS CHAR 
OH 
;SET IN TH IGIT 
Bice | een 35 oft THE NeXT CHARACTER 
ee, (R3) : INCREMENT FOR NORMAL RETURN 
MOV (SP)+,RO :RESTORE RO 
RTS R3 :RETURN TO USER 





TALL MOTION TEST CZTAD-D MACY11 30A(10S2 ~MAR-78 ; S SEQ O0S4 
CZTAOD P Pil 23-MAR-78 68:59 ROUTINE TO Pa ae ‘Scope LOOP” ADDRESSES FROM iHE TTY SEQ O0S4 
anecenngdentegnannennnanaanasssesssetsasnessegesenegenscettl nes 


Be :4HIS ROUTINE WILL INPUT THE ADORESSES OF "TEST" AND LOOP” FROM THE TTY 
eo atates 104401 015316 sot PE ,MTEST : Type “TEST PC?” 

si50 Bidtie bi $37 010142 Rov . (SP)+, 118 - 1 PIRSY AOQRESS 0 OF INPUT BUFFER 
S435 i888 1442 _— ao 33/5 EIN ¢ $eee--G0 "Shear THE LOOP “EY 
Be 2G 0102 oy irani”?* rai 

: gts CLR Ri’ ier a ALTO, 

eu i i 010022 ee JSR R3, I#AZOCT CHANGE - sir t , SocTAL 

5438 Bigiss bore . BR T. SETLOOP ERROR Re Cai =60 TRY AGAIN 

ern Bigles Suen ey Ae) TAREE PET SS re stack 

Eaat 818188 dane 015331 ss TOPE Ri SBP if E + 48M 

Saag OtoleD ices? ROW LN +,12$ Gel F Mo se Se) INPUT BUFFER 
Side Bigies 186977 848878 eye aies"’ ; rh CR” ’ 

Evi | 13178 oso LR 1 iBR EAR TIAL 

enue i 17 010022 a 3S R3, aeAZOCT :CHANGE TO OCTAL 

Ba a 01 001106 ROV RI. JeSLPAOR S"SeF Dobe LOOP ADDRESS 

Suey bipsie Olies? BoLLTB 33: MOV (2p) SeStPERR SCObE KARE AS THE TEST ADDRESS 
suse O15eee ote 32 137399 006614 MOV asi, yaroOPKey ‘em ERROR POOR KEY 

cise Bites Biers, BYSEtY a as SLERGaE LOOP EY 

2460 v10e44 O00000 SAVRI: és io ON HERE 


TAL1 MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE SS SEQ 0055 
2ZTADO.P11 23-MAR-78 08:34 ROUTINE TO SELECT THE DRIVE TO BE TESTED 


+s RERKSSKKSSRRKREERAHSARESAAASSRRASALAAAAAAAHASKKAHKAEKRARAAERRSES 
tus ROUTINE WILL SELECT THE NEXT DRIVE TO TEST 


T.SELORV: 
BIT LoCee Ore ween DRIVE? 


ane ae STACK 


170664 ; 
s T DRIVE 
il 


sa028 


VE “Bg” 
uy) VBOINTER TO “B" 


;SELECT DRIVE “A 


TND_PO NTER “A” 
Tine 7 TO ORIVE 
IVES "0 TEST? 


i Rov VEY RI ‘Bee T.19 THE FIRST DRIVE 
i688 170870 °° bie ae OVE F Te 
FLG 


38 
001103 wea THe ERROR INDICATOR 
;RESTORE R 


5 
eS 
ee 
pes 
2479 
5481 
5485 
Suge 


ONONOOOO OOO OOOOH 0000000000 


be bh bb bb Be b= 1 = bh bo 





oo 
ND 
= 
a 
Oo 
= 

3 

4 


Vee aa ey ae oo + 


BENFRLER— BBS 


~ 


ee 


OOOQWOOOQOOOOOOOOOOCOCO000000 


be bb be = bb bb be bb bP bb Pb: Ob 0 bb 


DANA 
WO NOU £ WHO: 


BERRIEN 


ath 
at =| 
Rt 


EST CZTAD-D MACY11 SOACLOSE) 23-MAR-7 SEQ 0056 
23-MAR-78 68:34 our INE TO SCOMBARE Ohl AND WRITE BUFFERS SEG 0056 


«SE 46-98 SE 0b SE SES SE eH SE SE gE ESE 0 0 gg a a a a 
; tus ROUTINE WILL COMPARE THE READ AND WRITE BUFFERS 


ate 


I= 


Betawoewens Baastanas 


ita 


t 
1 (SP) ;GET THE P OF THE “Cott 
613037 001204 MOV Aer akSAVPC Seve” Tre 
12737 015521 007304 MOV SM@UF CK , J8MFUNC POINT ce F ae, 
01 MOV (RO)+,R3 :PICK 
1 MOV (R3)+-R1 : PICKUP t PEER RO RDDRESS 
1 MOV (R23), A3 ;PICKUP T FER SIZE 
MOV 36 J+, Re ;PICKUP T a E ER ADDRESS 
010446 CLR $+ ;ZERO THE OFFSET 
MOV RO, (SP) :SET THE 
001206 CLR as8YTNUM ;ZERO THE —E NUMBER 
10 170512 BIT #SWO3, JSWR ‘COMPRRE DATA BUFFERS? 
S014} Q i$ ;B8R IF YE 
RTI }NO--- K 
1S DEC R3 :CHECK FOR THE TERMINATION 
BCE 4s. ie F BYTES TO COMPARE 
001206 4§ INC aeBYTNUM i COUNT TH YTE 
1 BBa508 2s CMPB baggie . ORPBRE READ ARO WRITE BUFFER 
010446 one + joe RT HALT BUFFER INDEX 
7 177774 O10446 Bic s1¢3, 282 LET IT GET CIGGER THAN 3 
114 001126 3S: MOVB -(R1) , @#SBDDAT eat THE RECEIVED BYTE 
010446 2DD este, Re iF 
ille 001124 MOVB (R2) , a8SGDDAT i GET THE EXPECTE BYTE 
104010 ERROR cE EXPECTED DATA NOT EQUAL 
s HASSE UATE RENE Cae On hee Tare eee 
011637 001 + WEG: MOV tSp) gugavec FeO SESE 85, THE Cal. 
012737 O18 007304 MOV erxut @MFUNC T MES INTER FOR "WEG" 
004037 012224 1S: RQ 3800. CMD :GO START A 
00010 XWFG! INT. EN!GO 
177776 CLR aePs ; ALLOW INTERRUPTS 
G04037 011716 JSR RO, JeWAITFLAG iGO WAL AFLAG 
104004 oR 4 ino thr 
004037 012014 ISR RO, JeFLAGS ;NORMAL RETURN---FIND OUT WHAT FLAG 
104002 ERROR 2 : RETURN HERE TF xe “XFER REQ” AND “READY” =0 
104002 ERROR oe ; RETURN HE XFER REQ" =1 
oo00Ge RTI RETURN HERE IF READY" =1 AND “ERROR =0 
104002 ERROR 2 : i READY" =1 “ERROR™ 








TAl1 MOTION TEST CZTAD-D MACY11 30A(10S2) 
CZTADD.P11 23-MAR-78 08:34 
ae 
2534 010554 001204 + WRIT 
2535 i 15353 007304 
ae Bl 
13606 O12222 
2540 O1 010676 
254 10619 
seis Sloss 
eo4e Ie 012224 2s: 
ey 8 itt . 
es i 
SO 010640 001254 
Seek eee “QO 177776 
10652 012014 
eo83 010656 
Seec Bioees 
2556 010664 
ess7 1 4S: 
2558 0106 
2559 0106 
seef 215709 oe ats 
sees Ot Bibese 
2S64 tats 177774 01067 
2565 01 45 1 2 012346 TB 8a8 
Seep 015730 012222 000004 ss: 
2568 0107 BiS556 _ 
5258 bigeas 455 177776 
2571 010750 011716 
eee 010754 104003 
2574 bi ose8 004037 012014 
2575 010764 104002 
2576 010766 104002 
2577 610770 oo0000e 
2578 010772 104002 


23-MAR-76 


ROUTINE TO ™ rs a PH ON THE TAPE 


+ REASERKERARSERAKEKERRAERAKA KER EAAAAELAAAAEKAAHAAAAAKAAAKAKRE KKK 
i +urs ROUTINE WILL WRIT af BRECORD ON T 


(SP) .a8 


MOV 
MOV anual SeMFUNC 
MOV a(SP) Re 
ADD #2, (SP) 
MOV (Re)+,R1 
CLR aeCRC: WO 
CLR 6$+e 
MOV (R2)+,R2 
BGT 2s 
ERROR 
SR ,98D0. CMD 
XWRITE! IN ZEN! GO 
CLR aap 
JSR RO, JOWAITFLAG 
ERROR = 
ERROR 
CLR Jeuar recy 
oR RO, a0 
JSR aPtags 
ERROR 
BRROR e° 
ERROR 2 
DEC Re 
BLT Ss 
Sice R1),RO 
MOVB ny aTADB 
JSR 9200. CRC 
Bic tc3,& 
Rav ie eS TRVEC 
MOV SF orc. WO. 4(R1) 
JORITES INT EN! ILBS 
seh 
J , JSWAITFLAG 
ERR 
ERROR 4 
ISR RO, JeFLAGS 
ERROR 2 
ERROR 2 
RTI 
ERROR 2 


SEQ 0057 


THE WR LINK POINTER 


UPinat™ OF WRITE BUFFER 
ZERO T ed CRC o WORD 


ae Pon PASCIZ OF “WRITE” 


af io. WRITE 
bate 


vies 
$60 ae Suni TE" 


; ALLOW ANTE 


;WAIT F 

;NO_FLAGS OCCURRED 

; INT T ee a 

iL eK on INTERRUPT KEY 


eee =1 8 “ERROR™= 
:NE BotO WRITE A BYTE ON TAPE 
IF NO 


TRONSFER ACB WE TO THE ALL 

; CALCULATE CRC FoR TH YTE 
Deere TR 

a aif UP TO SERVICE THE INTERRUPT 
ive THE CRC WORD 

;START A “ILBS” 


; a6 a ITER 


;NO_ INTERRUPT 

; WHA FLGG Is Ser? 

OPE (“XFER REQ"=0 & “READY™=0) 
ER REQ” 


vn 
READY & “ERROR” 


SE@ 0057 





TAL1 MOTION TEST 
ADD.P1 


: 


‘a 
BS 
«as N 


Statatet stata 


senepanees 
25 


5 


wo 

- 

_ 
Sans 
-_ 
NN 


eo 


ce 


CRO CRON 
BELRRIGS 


BRR SEE Eto 


iG 


Benen 


ONONDDOOO OOO OOOO O OOO OOO OOOO QMOOOOO OOO OOO OO COO 000000000000 
ee ee ee ee ee ee ee ee ee ee ee ee ee en ae an fe fe ae ee Bee Be be be be ee ee 
ss 
=~ 
-_ 
NN 
We 


G) 


oO 
Coa 
tu 


3 


f 


82 


-_ 
£ 
— 
£ 


: 


EEE EE EEE 
WOONOULSW-O 


f 


be be De Be be ae se Bee ae Bee Be Pe Pe Pe ee eee Pee 


SFILOLNS ERNE LUST CVO 


a 
-OO 

= 

go 

NG 


Ro 


saan 
ea 


Be be ee ae Bee te bn fe bee Be ae ae es bee be be ae ae bee ae Bee ee bee ee ae be fe fe a fe ee ee Pe fi a ne ee fe se ee es oe ee en 
££ 


4 
2 


oo 
tur 





007304 


001210 


177776 


170064 


COlele 





CZTAD-D MACY1L1 30A( 1052) 
08:34 


es: 


3$: 


4S: 


9$: 
Ss: 


-MAR-78 O08: 8 
ROUTINE TO “READ A RECORD 


BOAT -RLNK1 (RO) ,RO 
RCO 


2 re) 
O~ 202 


ees o7(SP) 


1 
12> +, aeSESCAPE 


2 
BCR WO, @#RCRC1 


Porn sehtit ites" 
eset gt 


31908 RCRCe+1 








poeutnnegenseneentapesestent ia tt i 


i turs nore ae CORD FROM bia Me 


Pee Nat 


OREM Beton Ne Ith 
HIS BLOCK 

i ADORE 

SOE ees 

i cLERR RC, oR AD" 

ALLOW INTERRUPTS 


sSEt TERMINATOR IF LAST BYTE 
IT FOR A FLAG 


3N D 
oT ee 
;CLE WAIT ML eal KEY 


= 
Qe 
See 


{READY etry “ERROR” 


‘Ba tr NG 


AD ONE 
+ BND PIN THE BUFFER 


ULATE CRC FOR_THIS BYTE 
Sat cUL aT SERVICE THE INTERRUPT 


Soe, OF BYTES NOT READ 


otis ERSBRE_ AOORESS 


iM a THE STACK 


sOLOCn READ SHOR 


ER occu ESCAPE ADDRESS 


‘aio anal ‘eRe 
isr TERRUP OF CRC FROM TAl1 
TS 
SccuRRED 
EINT RRUPT FAILED 
AVE 2@ND 


BYTE OF CRC FROM TALL 
CHECK FLAGS 


TAL1 MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 09:36 PAGE S93 SE@ 00S9 


CZTADD.P11 23-MAR-78 08:34 ROUTINE TO “READ” A RECORD SEQ 0059 
2635 O11252 104002 ERROR 2 ;UNKNOWN FLAG 
2636 011254 104002 ae 2 at REQ” 
SP3g Bt t8e6 a 037000 "piper scipacyat i PLINE aTacs 
sraa S118 fB4Gh Fifor 8 Se hees" 
2641 O11 7? 900020 167642 65: BIT #SWO4, ISWR ie Seky ERRORS? 
eos O11 001 BNE 7$ :BR_IF ye 
4 11 10401 RROR 1 "RE ND “CRC ERROR 
2644 011302 o0000e 7$: RTI :I1T WAS A CRC ERROR AND WE ARE IGNORING THEM 


264S : ; : 50 RETURN TO CALLER 


OS 


TALL MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE 60 SEQ 0060 
CZTADD.P11 23-MAR-78 08:34 ROUTINE TO “BACK-SPACE-FILE-GAP” SEQ 0060 
2b + SRERSHEKSSRAARSSEKRESRRARAEAERAAASLALEAAAAAHAARAAHAAAKAAEERERHLE SS 
264 '+HIS ROUTINE WILL BACK SPACE ONE FILE 
2648 011304 011637 1204 +.8SFG: MOV ) apesavec OF CAL 
2649 911310 27 18433 007304 MOV r G, aaMFUNC ‘SAVE POINTER OF .ASCIZ NAME 
2650 01131 7 Ole2e4 1$: JSR RO, a#D0.CMO ;STRAT A “BSFG™ 
2651 Oll3ee XBSFG! INT. EN!GO 
26 ll 177778 2 3° WW INTERRUPTS 
26) 11 37 011716 ISR 0, J8WAITFLAG : af ON 
2654 O11 1 ERROR 3 10 Fuge’ 
2655 O11 AO4O04 RROR 4Y :FLAG DIDN’T INTERRUPT 
2656 011340 037 012014 JSR RO, a8FLAGS :FIND OUT WHAT FLAG OCCURRED 
2657 011344 10400e ERROR ; UNKNOWN 
e658 11346 o400e RROR ;"XFER REQ” 
26S il boost BR es :“READY" 
2660 01135¢ ERROR 2 ;“READY” 8&8 “ERROR” 
2661 611354 714 oo4000 2S: BIT SFGAP, JTACS ;IN A FILE ? 
2662 011360 001401 BEG 3s :BR IN NC 
2663 011362 RTI :GO K 
ebb4 011364 104006 3S: ERROR 6 :"BSFG" DIDN’T STOP IN A FILE GAP 
cee 
2667 + RERKKRSKRSEREKAKKKEARKERELESAKKAAAAKAEKKAKAAKAERESHLRAAKALRAHREE 
2668 '+HIS ROUTINE WILL BACKS SPACE ONE BLOCK GAP 
2663 011366 011637 00:204 +.858G: MOV SAVPC SAVE THE PC OF THE CALL 
270 O1137e2 012737 O154S7 007394 V ry , J8MF UNC i SSAGE PO POINTE ER 
coos Biiuey pool, oom st yeeactInTeentGo 
2673 O11406 005037 177776 CLR aePs Bar eon INTERRUPT Ss 
2674 O114i2 004037 011716 JSR 0, JSWAITFLAG FOR A FLAG 
2675 O114i6 1 ERROR 3 AG OCCURRED 
2676 O11420 1 ERROR 4 Page BiDN: T INTERRUPT 
2677 O11422 004037 012014 ISR RO, J#FLAGS FLAG LAG OCCURRED 
2678 O11426 i0400e2 ERROR 2 UNKNOWN 
ee reed antares ERrOR “ pe A BACK TO USER 
2681 011434 104002 ERROR 2 !“READY” 8&"ERROR™ 


JOS 


Tals MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 :36 PAGE 61 RB SEQ 0061 
CZTADD.P11 23-MAR-78 08:34 ROUTINE TO “SPACE-FORWARD-F ILE-GAP SEO 0061 
2682 ; g3 RERKKKKKKKKKKAKAKASLAKSRALAKAAAERARAKLAAAAAFRAAKAAAAAAAASAARHLES ; 
2683 > tHIS ROUTINE WILL SPACE FORWARD FOR ONE FILE GAP 
sees 114 116 7 901208 t.SFFG: mov (SP) ae AVPC ;SAVE PC OF CALL 
1144 12737 015366 007304 MOV aMxStFG, JSMFUNC ‘POINTER TO .ASCIZ MESSAGE 
e686 il 012224 1S: JSR RO, a#D0. CMD :START A “SFFG™ 
2687 011454 13 XSFFG!INT.EN!GO 
e688 011456 77776 CLR aap +ALL QM INTERRUPTS 
il 11716 J RO, JeWAITFLAG ;WAIT FOR A FLAG 

2690 O11 1 RROR 3 FL FAILED TO OCCUR 
2631 114 RROR 4 FL DION INTERRUPT 
26 114 012014 ISR RO, J#FLAGS :WHAT FLAG OCCURRED 

$3 O114 1 RROR ; UNK 

34 O1t RROR i EER REQ” 

gs O11 1 BR s i READY” 
e696 011808 10400¢ ERROR 2 :“READY" AND “ERROR” 
e637 otigts G3e714 004000 2s: BIT BEGAP, JTACS BRIE no. STOP IN A “FILE GAP"? 
2699 011514 RTI :RETURN TOC CALLER 
$700 011516 104006 3S: ERROR 6 :"SFFG" DION’T STOP IN A FILE GAP 
2702 
ae ‘HITE ROUTING HILL SPACE FORMARD ONE BLOCK GAP 
2705 911520 011637 001204 +.SFBG: MOV cep} seSAvec ; SAVE OF CALL 
2706 011524 0612737 O154i1 007304 MOV eMXSF BG, JeMFUNC :POINTER TO .ASCIZ MESSAGE 
6707 011532 GO4057 012224 1S: JOR ngage gog: CHO :START A “SFBG" 
a pi teas eer zA45 177776 CL ae ;ALLOW INTERRUPTS 
2710 011544 004037 011716 JSR RO, JeWAITFLAG :WAIT FOR A FLAG 
2711 011550 104003 ERROR 3 :NO FLAG 
2712 011552 104004 ERROR 4 :NO INTERRUPT 
2713 011554 004037 012014 ISR RO, J8FLAGS :FIND OUT WHAT FLAG 
2714 O11 1 ERROR 2 : UNKNOWN 
2715 011562 104002 ERROR 2 :"XFER REQ" 
2716 011564 RTI 3; “REROY™ 
2717 011566 005737 o012e% TST aaASKKEY :RUNNING UNDER MANUAL LOOPING? 
2718 011572 002001 BGE 2s ;BR_IF NO 
2719 0611574 900002 Ril : RETURN 
2720 011576 104002 2s: ERROR 2 :"REALY" QND “ERROR™ 


rorurur 
NNNN 
ane 
-_ 


NOE 


OONOOOONONOOOONOQOOOOOOQ90000000 


= b= bb be bb bb bb bb bb bb bo bo 
bb bb = 0 bb bb 0 bb Pb 


PREIS C EOE 


NNN 
mere 
£vuo 


KOS 


ST CZTAD-D MACY11 30A(10S2) 23-MAR-7 ge 3 SEQ 0062 
23-MAR-78 er ROUTINE TO SREMINO’ THE APE” SEQ 0062 


eee nn ae ee 
j tats ROUT INE WILL REWIND THE E 





001204 t MOV CALL 
resu4 007304 MOV SRXRUND aMF UNC PORTER | 10, cBeclz MESSAGE 
12014 Jer Ro sercacs :C ok THE 
OR 1 ;NO 
ERROR 1 + ORFER or 
:NORMAL RETURN 
167426 rot oad LG ; WAS ee FUNCTION A REWIND? 
020000 BIT SLEADER, JTACS ON LEADER? 
ie7412 BFR LG 18s TE No THIS ERROR ONLY ONE TIME 
ERROR : ON CLEAR | CERDER BUT SHOULDN’T BE 
012224 1S: JSR 2800. CMD :GO A “REWI 
XRWNOD! INT. EN!GO 
177776 CLR s 5 ; ALLOW INTERRUPTS 
011716 ISR 0, 28WAITFLAG :WAIT ON FLAG 
i ERROR 3 :NO FLAG OCC D 
104004 ERROR 4 :NO INTE ERRUP 
37 012014 ISR RO, JeFLAGS ‘WHAT FLAG OCCURRED 
194002 ERROR 2 ; UNK 
bo040 os : RED 
2 ERROR 3 ieee 
b32905 020000 2s: BIT SLEADER, aTACS : ON aR EAR LERDER”? 
001401 BEQ 3s ;BR_IF NO 
000002 RTI : YES---RE TURN 
104007 3S: ERROR 7 !"REWIND™ FAILED TO GO TO “CLEAR LEADER™ 
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TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE 63 SEQ 0063 
23-MAR-78 08:34 ROUTINE TO WAIT FOR A FLAG SE@ 0063 


+ EHKRRERAEERERRAEREAEAREREA “RERKHKAAHKRAAAEAHEAAAAAAKERELESAAKEKRES 
turs ROUTINE IS USED TO WAIT ON A FLAG 


oo 


‘CALL: 

; JSR RO SeHATTELAG 

; RETURN FOR N 

: RETURN FOR NO TO eeRUPT 

; NORMAL RETURN 

WAITFLAG: 
005037 012006 CLR LOCNT ;ZERO THE LOW COUNTER 
0137 7 O1edie 012010 MOV MAXCNT, HICNT :SET THE HIGH COUNTER TO MAX.COUNT 

333 40 167202 BIT * pow ; NING WITH INTERRUPTS? 
873393 177777 001254 V #-1,WAITKEY iBB, fue INTERRUPT OCCURRED FLAG 
BIT @TR: REQ! READY, aTACS :T ST FOR FLAG 


Boi0 4 000240 1S: 
37 012006 


a" 
= 


2s ; fs uP 
LOCNT fed THE 13 ee 
hYonr ik } cht COUNTER 
Es : T NEG. 


NATREDRSR 
abe 


ELE 


: iteBve NO 
7 2s: Pe, (RO)+ HINGE NENT THE RETURN ADDRESS 
001254 rer WAITKEY i LOOK WAIT ON INT. KEY 
1401 Q :BR IF 
005720 TST (RO)+ i INCREMENT THE RETURN ADDRESS 
00 382 RTS RO :RETURN TO USER 
000000 HICNT: O 
ooo0000 MAXCNT: O 


Mo 


TALL MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE 64 SE@ 0064 
CZ2TADD.Pil 23-MAR-78 08:34 ROUTINE TO EXAMINE THE FLAGS SEQ 0064 


5 FESR AE JE aE EE SE HE aE HE HE 
; THIS ROUTINE IS USED TO DETERMINE WHAT FLAG IS SET 


sagaess 


CALL: 
: JSR RO, JeFLAGS 

e787 : RETURN FOR UNKNOWN FLAG cys 
£88 | RBI FBR -apagec® 
2730 ; TURN FOR “READY” & “ERROR” 

12014 714% 000240 FLAGS: T aTR.REQ!READY, aiAcsS »CHECK FOR “XFER REQ" OR “READY” 
er BiSRs¢ Bae733 B2d OVFLAE eR f NON FLAGE 
734 O1e0ee 720 TST (RO)+ id REMENT RETURN ADDRESS 
So ae 1 105714 TSTB aTacs :CHECK FOR “XFER REG 
2 012026 BMI LVFLAG :BR IF SET 

912039 9087 Ts (RO)+ : i REMENT RETURN ADDRESS 

1 5327 000100 167100 BIT SWO6 , ISWR : ST Obst ? 
2799 (Ol 414 BEQ 3 F 
car Sieh Bl my Gs ctSe}_—eBUSH AY BN eta 

i v Ri'-(5P) ::PUSH Ri TACK 

2802 O0120%6 013700 001264 MOV aeSTALL RO ;GET STALL TIME 
2803 Ol 13701 1266 MOV JeSTALL42,R1 
2604 Ol 1 1S: #1, ; STALL 

i 4 wee BNE a ooP 
ce Bless flseel ee eens Pee TRE ere 
sig flees {op001 an Ma ee iar 
$319 yee Ss (RO)+ + PR CREMENT FET CRN ADDRESS 
2812 012100 000200 LVFLAG: RTS RO 


~ 


ae 
23 


ee ee 
OOnNC UI LCwW 


Poswoda 


ZNSE LR LHSS EHSK VSS VEWGRZ VD 


RSs 


: 


ReeLESELEEE At tvis itc: 


DOOOOOOO OOO ON OO OOO 090000000300 000000 90 


rurufury 
fururory 
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EST CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 &E SEQ 0065 
23-MAR-78 08:34 ROUTINE TO CALCULATE THE CRC SEQ 0065 
+ EHFSERRSKRESAERSRKAEREAREAASSAALAAAAAAESAAAAARKAAAKAAKAAAAEAAASKER 
tats ROUTINE WIL! CALCULATE THE CRC 
; ISR PC, a#D0.CRC ;RO=1 BYTE OF DATA 
DO.CRC: 
yng mov RO, -(SP) Bust RO er erect 
10146 MOV R1;-(5P) i i PUB H Ri TACK 
10246 MOV Re; -(5P) > ;PU Re ON 
1o3ug, MOV R3,-(SP) + eueH R oN 
io 012176 MOvee a teee Ri ON STACK TERATIONS 
Bt : 899939 - nov eRe:i8 ra ;PICkUP fhe Are RoR 
B1g308 ; MOV R ;GET THE PARTIAL CRC WORD 
177776 BIC at¢BITOO,R2 iSTR RIP ony EVERYTHING BUT BITOO 
101 Ror Re ve 8 THRs OA Ty 
184 6 ORT RY BND SETUP 10 Se AI” AND "Re" 
BIC R2,R4 
1 . IC RI. Re 
Is RY, ;RESULTS TO “Re” 
vei o4o002 aa oe 4!BITO1,R1 
BiB Rd Hoy APT hd ;FORM THE XOR OF “RI AND “R3™ 
040304 BIC R3,R4 
Bb fe RR 
3 ” BIS RaR ;RESULTS TO “R3” 
00$327 aa (PC)+ 
" T ; F TS TO DO 
012604 MOV (SP)+,R4 ;;POP STACK INTO RY 
012603 MOV (SP)+/R3 ::POP STACK INTO R3 
1 MOV (SP )+'Re ;3POP STACK INTO Re 
012601 MOV (SP)+'RI ;POP STACK INTO Ri 
012600 MOV (SP)+'RO BOP STACK INTO RC 
000207 RT PC 
000000 CRC.WD: O ;CRC WORD 


B06 


CZTAO-D MACYL1 309( 1052), F9 HORT TO LERFORN THE REQUESTED FUNC TON 


= 4 SE BEA 0b 4 SE SE SESE SE SE 9 4 0 aE a 9 a gE a a a a a a aaa 
'¢HIS ROUTINE WILL LOND THE LOW BYTE OF TACS WITH THE DESIRED FUNCTION 


ALL: 


CG 





Bes ine FOReT IN’ 
URN 
bo. CMO: a o, } ;SAVE Ri 
000340 177776 v :LOCK OUT ALL INERRUPTS 
i Soni SAY 
booese 166670 oy src apanrverion von itrouT INTERRUPTS 
. SINT ifn fy. Bt ; a } on F SET 
Mes eaten * CUR _— SERS THE es TH 8 RUPY KEY 
i > i yee RI ; NING WITH IRTERPUP TS? 
012340 166724 ies MOV as syeéo"=* iS err T CE THE INTERRUPT 
ooc001 ‘ BIT agen ids ff T A "1"? 
000040 1S: Bi . ADY , ITACS ;WAIT F ADY” TO CLEAR 
2S: COM Ai eT ge cyeen TISHINO FL LAG 





T OR 
177761 Cc etC<FUNCTION> ,R1 
16672e Rov R Rime oF AS THE REWIND FLAG 
me age Bt Te tecn 
RTS RETURN 0 USE 


8 = SERKRERAKESRAKSRESKERHSRKAG {RRA TRAKKSKKAFSKRAAKRERHKHARRKAAARKRRKLRE 
' tHIS ROUTINE WILL SERVICE ALL LEGAL INTERRUPTS 


TE 


12340 0127 177777. 001254 SERV: MOV aWAIT THE WAIT KEY 
BLesve 218335 012356 166654 MOV SaAOTNT There SET TO CATCH ILLEGAL INTERRUPTS 
Oie3s4 o00002 RTI 

H pepeeucngznasnessenereemnerree tetrer te gee ear task 
'¢HIS ROUTINE WILL CATCH ILLEGAL INTERRUPTS FROM THE T 
012356 011637 001204 BADINT: MOV (SP), a@SAVPC ; SAVE E AT 
Ol236e 104014 ERROR 14 : ILLEGAL RHEE TERRUPT. OCCURRED 


3 
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TALL MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 06:36 fwE 67 SEQ 0067 
CZTADO.P11 23-MAR-72 08:34 RHHERREREE MANUAL ADJUSTMENT ROUTINES #8eeeR REE SEQ 0067 


ett ee 21h bd bebshshshehabehehebebchehehehebeehehebeiehohohehchohehehohebohehhoheheicichchehehohohetel 
Scr MANTRE AEDT RNS CRE CGLPES OSE RS ELT A? 


RR ac hk ne pas i 
7 STARTING So” THAT - 
: ive miro ne eee San 7 REGISTER: 


tL LLL Lee. 


ree 


2910 
2911 
sais Hes tts i ttt th bbb taht b-toted-b-b-b-totab-+-tab-P-5-4-5-halalalalahahalalalalalahaiehaltialalalelielal 
: WRITE FILE GAPS FROM “BOT” TO “EOT™ 
2914 ;START AT 
S3ie 3 THS.. Coty D TO ADJUST THE “WRITE GAP MONO” AND 
sa} 12364 12706 001100 cot ee WAY 
5318 BtS350 Raed 001220 * MOV se tacel TACS Seu re star US AND 
5351 BtSio9 Baagbe 001224 . Js TADBL , TADS Re GISTERS 
i i 017364 001110 MOV SWF GSUB, JeSLPERR i Hore ERROR ADDRESS 
eae Gisuie if 4 000017 ReyB #XRWND!GO, JTACS ie aes T™ 
teM1 as714 000040 100s: BIT BRE ADY Y, aTACS SE 
eae? leis iowite 1S: G _ ;WRITE A “a,EIVE 
i 714% o20000 BIT SLEADER, JTACS ;AT “CLEAR LEADER”? 
Bas tore mer Fol 
1 Ot SR Ss WFGSUB 05 bn XSRT. 
2332 —~CS*# 
2933 
5 BE aE EE AE He HE HE HE HE HE HE a EE HE a aH a a a a Ha a a a HH HH HEHEHE 
; NUOUS BLOCKS OF DATA 
2937 i Fhe PROG HALT 1 ) TIMES 
Souq wart § -- ae TINGS 
eat 2 THs hoi hp eer ‘aus aR MONO” 
Saya sere a ee 
294S g12440 0047 013106 béTSue: JSR ; oPiee BND PA PATTERN 
2946 012444 ose 001100 WLOOP: ‘MOV HE WAY 
2947 Oie¥s0 13704 901220 MOV 38 te acs ie 1 THE ral. Srarus ANS 
2948 O01 0137 1224 MOV aT ; Bure ER REGISTE 
2949 012460 RESET . 
2950 Ole4be Die 012444 001110 MOV SWLOOP, J8SLPERR ;SETUP ret hi ERROR ADDRESS 
set BIEW2 1TES oonni7 REXB™” axcuno:co,aracs SELES BPiSSr- 
2953 012476 032714 900040 100$: BIT #READY, aTACS ‘WAIT ON READY 

























TALL MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE 66 
CZTADO.Pil 23-MAR-78 08:34 WRITE span BLOCKS OF DATA 


3s oi a0G At 704 1S: Oe CTE WRITE A BLO 
13510 O3e7 4 Bs aR08 : 8 a aTaAcs tAT TE Bape CEADER™? 
12514 1773 Q :BR IF NO 
12516 HALT :STOP IF “EOT” 
012520 630751 :LOOP IF CONT. 


j Sennen ROR RNERERERERERRRRSEESEREREteReReRResteasanenntenanensens 
Ret eRt COMPARE CONTINUOUS BLOCKS OF DATA 


T 
3TH 5, T cA pe D TO ADJUST THE “SIGNAL MONO” 
ssussnekeenannananenennsseeeersineneenensnuaasanssessassaneters 


Bisese 15704 Oolse0 ROSUB: MOV SSTACK) SF tte THE TALL STATUS AND ~~ 
oss 001224 a . JeTADBL , TAOS ; TA eG REGISTERS 

i O12” 012522 001110 v SRDSUB,ISSLPERR ; SETUP THE L OP ON 

15350 iiz7ts 000017 sexta! G0 aTacs ah iat els 

i Onze 100S: Bo, . ROY ataAcs 

ott sf Rh REA A BL 

012976 Bers Boi08 TT Pe aTACS Pith Co 

O1e576 1351 jBR IFAS IF YE eats 

12600 104423 KCMP :C AND WRITE BUFFERS 
Bigece gt70be roe a UE ORE 
012606 ; 


000765 BR 1s 


Ltda et f-5-5- tad al bt ah tah -5-5-tab-bel tah tal -tah--ty hah -+-tab-4-4-5-tal-+-4-tlah-+-4-tab-t-tal-t-t alae 
; ware FI i AND A BLOCK OF DATA FROM BOT TO EOT 


; AT 
$ em wa.T THREE(3) TIMES 
;AF TER EACH T THE SWR ze CONTINUE 
; 1 --- <7:0> = R BY PER BLOCK 
nett --- <7:0> = PATTERN DESIRED 
HALT 3 --- <15:0> = OPERATI SWITCH SETTINGS 
s TIS ROUTINE CAN BE USED TO ADJUST THE “WRITE GAP MONO” 


eEVREAE LIL SEMPER PARRS LA toad cae 


ID THE “GAP TIME MONO”. 
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E06 


08: 69 SEQ 0069 
E A FILE Bae BNO A BLOCK OF DATA FROM BOT TO EOT SEQ 0069 


;THIS ROUTINE SUPPORTS THE S/W SWITCH REG FUNCTIONS 
Neer telah t-b-t-leb-teb-tel-F-b-b-b44 


WOPBLK: J PC, JeSET ;GET K PATTERN 
WGBLOP: a0 estRer KEEP Tue STACK ou OF THE WAY 
MOV aeTAcsl, TACS : uP T TALL ATUS AND 
MOV as TADBL, TADS : DAT ER REGISTERS 
RESET ; ESET WORLD 
MOV #WGBLOP, J#SLPERR : THE LOOP ON ERROR ADDRESS 
SELDRV :SELECT THE DRIVE 
MO #XRWND!GO, JTACS 35 TAPE TO “BOT” 
100$: BIT #READY, STACS :WAIT ON READY 
BEQ 100$ 
1S: WG ;WRITE A FILE GAP 
BI EADER, aTACS ;AT “CLEAR LEADER”? 
BNE ;BR_IF YE 
WRITE WLNKX :WRITE A BLOCK 
BIT bLEADER, JTACS :AT “CLEAR LEADER”? 
BEQ 1i§ :BR IF NO 
2s: HALT :STOP AT “EOT” 
BR.  WGBLOP :START OVER ON CONT. 


5p RRA AAAS AER EEE ERE REE EERE EEE REE EERE 

; ny A TOOMPARE A BLOCK OF DATA AND A FILE GAP 
: THIS T S USED AFTER “WRITE A BLOCK AND A FILE GAP” ROUTINE 
:IT CAN TO ADJUST THE “SIGNAL MONO”, THE THRESHOLD POT” 
:AND THE “T BLANK MONO” 


TTT TT ITT LLL ht hub tht tb bbdelebdeb-ieh-delab-tel 


REPBLK: MOV BSTACK SP s KEEP THE STACK QUT OF THE WAY 
HOV oer abar' TASS Bara eurreR RecisTERS 
RESET : SET HE D 
MOV SRGPBLK , J#SLPERR ; THE L ON ERROR ADDRESS 
SELDRV :SELECT THE DRIVE 
VB &XRWND!GO,JTACS :SEND T TO “BOT” 
100S: Bo #READY , ATACS :WAIT ON READY 
1S: AD NKX ;READ A BLOCK OF DATA 
MOV bSTACK, SP :KEEP OUT OF THE WAY 
IT BLEADER, STACS :AT “CLEAR LEADER”? 
RGPBLK :BR IF YES 
BLKCMP Cc AD AND WRITE BUFFERS 
RLNKX i LINK TO T BUFFER 
WL NKX :LINK TO T ITE BUFFER 
SFBG :GET INTO FILE GAP 
BIT SLEADER, aTACS :AT “CLEAR LEADER”? 
BNE RGPBLK :BR IF YES 
BR 3l 


5 Pe aE Se A aE ie aE aE a a a a a a a aa HH a HH HH aH 
; SPAC bet FILE GAP FROM “BOT” TO “EOT™ 


;START AT 244 
;THIS ROUTINE CAN BE USED AFTER “WRITE FILE GAP” FOR LOW SPEED 
;SPACE FOWARD (TAPE BLANK MONO CAN BE ADJUSTED), OR AFTER READ OR 


stot 
to 


. 
»_OO0O00000000000 


b= bb Po he 


ie 


: 


Seeeeeeee 
SSS 


WWW 
1 


FSVEVERLILULULL CEBSAREPRAREM Mt uaue caaiiclt 
288 


8 
8 
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ONONODOOQO0OOO0000000000 
be be be Be ee he ee bh ee 
WVQWWWWWWWWWWWWWWWWWW 
ete ae be ae ae ae ee be be ee be be Be ee 
NOPFOTNFLORNSL LUSWOR 


Cpntetatetetatata 
BIRREBRLBS 
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CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE 70 SE@ 0070 
08: 34 SPACE FORWARD FILE GAP FROM “BOT” TO “EOT™ SES 0070 


et A a GAP ae. A A OE OF DATA FOR HIGH SPEED SPACE FORWARD 
,evnenelatnenevaunanenaunanssaeeneeiensnnegeenanseseyenseseyets, 


BS 1200 frase: HOV gitncst. Tac ie TEAK SUE TUS AND 
ee 
001224 mov Se TASBL TAbe BE Tae ae istere 
013000 001110 nov survess. JeSLPERR ie He_ LOOP yen ERROR ADDRESS 
17 RBUBY pom! $9 azacs E19, oo 
40 100$: BIT A ; 
1S: SFr pons NTO A FILE GAP 
020000 IT senbeas sAT “CL LEADER" 
BEQ 1§ iR IF 
HALT :STOP AT “EOT™ 
BR SFFGSB :LOOP ON CONT. 
i, 
iccnimamma a a GTA melamine siniestemnec cca este 
BACK, K SPACE FILE GAP 
Fits CAN BE USED TO ADJUST OR CHECK THE “SIGNAL MONO”. 
peunney THIS, ROUTINE, CAN BE USED | HEUEKELAREERRFA RELA AKHERAK EH HH 
béFcse: RESET jRESET THE WORLD 
013054 001110 Vv s8SFGSB, J#SLPERR L ON ERROR ADDRESS 
001172 cLR SESCAPE sDON’ On ERROR 
1S: BEES + BEE SPACE R FYE GAP 
020000 BIT SLEADER, JTACS ;AT “CLEAR LEADER? 
BEQ 1i§ iBR I ae 
HAL T > STOP T BOT 
BR BSFGSB : START Rove ON CONT. 


5 36 AE SE Se ib a aE 9b EH He a ea a 9 HH gH aH HE 
TUP READ AND WRITE LINKS FOR SUBROUTINES 


éevaur: ao RATUR PUTS BYTE COUNT IN THE SHR 
000176 001140 CMP sSWREG, SWR ‘USING S/W SWITC 
BNE 20s :NO- GET OUT 
GTSWR ;GET UE 
20S: : CONTI 
166010 B1S8 QSUR, RO ; PICKUP THe ByT COUNT | 
166003 TSTB aSWR+ 1 ; CHECK iP GREATER THAN 377 
BEQ 1 :BR IF NO 
000376 MOV 4376, ,RO ;SET FOR MAX ALLOWED 
1$: INC R :MAKE IT 377 OR 1 
017010 2s: MOV RO, J#RLNKX+2 :SETUP READ LINK 
017044 MOV. RO; JSWLNKX+2 :SETUP WRITE LINK oat to 
000176 001140 CHP aSWREG, SWR : USING $7H WITCH REG? 
BNE 21$ :NO- GET OU 
GTSWR :GET VALUE 
218: : CONT INUE 


ue 


TALL MOTION TEST CZTAD-D MACY11 30A(1052) 23-MAR-78 08:36 PAGE 71 SEQ 0071 
CZTADD.Pil 23-MAR-78 08:34 SETUP READ AND WRITE LINKS FOR SUBROUTINES SEQ 0071 


brFiis M xierene’ iP yokur ETSI ORESS OF BUF,ER 
% ' 
rs FILL THE BUFFE 


i SET ie] pie ee Sur Tgnes 
000176 001140 SNe tat 


; 
3 
3 
3 
3 
3 
3 
3 
3 


-— b— be ee 


0 ee eee ee ee eo 
OWONGCU £Wte-O 


Snr inue 
RETURN 





TAL1 MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE 72 SEQ 0072 
CZ2TADO.P11 23-MAR-78 08:34 TYPE ROUTINE SEQ 007e 


1 -SBTTL TYPE ROUTINE 
See eee eee eee aE MUST TERMINATE WT AO. 


He 
ihr TINE Oo ryee 2 MESSAGE mug! TERM NATE WITH E. 

us HSTHe ROUT Rout sag. nin aM TA one Ne eee CHARACTER T ERs ber ERA aotiNe FEED CHARACTER 
3 : c . 

3127 MOTEL: ts Ytts COANTAIRS THE NUMBER OF pte elP Ear Ss Aebo i RE RED. 

3128 ; #NOTES: SFILLC CONTAINS THE CUARACTER TO FILL AFTER 

3156 :#CALL: 

3131 :#1) USING A TRAP INSTRUCTION 

3138 _ TYPE , MESADR ;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
3% 

3134 ;# TYPE 

3135  # MESADR 

1% ‘ 

3138 013230 105737 0601157 S$TYP®: TSTB STPFLG ;;1S THERE A TERMINAL? 

3139 013234 100002 BPL i$ ::BR IF YES 

3140 013236 000000 HAL :;HALT HERE IF NO TERMINAL 

3i43 1 3e4e TBoNe 1s Sov 33 csp) Save 

314s Bt 1 ooc002 ; MOV a ISP), RO i: T PbbRESS or ASCI2 STRING 

aia 013250 112046 2s: MOVB (RO) +,-(SP) ;PUSH C HARAC ER TO BE BE TYPED ONTO STACK 

3id2 Bisseg Bge98e ¢ (8), iB FE pat we Br POR IT Ore THe STACK 

dig Blues BRERE co000e se Be SSTF at umn rc 

aig Bt 4 RBS obS P R ; ihe 

3150 013266 jee? 16 oc0011 4S: CMPB #HT, (SP) :;BRANCH IF <HT> 

3151 O1 1430 BEQ 

3i5¢ O1 74 iee? 16 000200 CMPB BCRLF , (SP) ;;BRANCH IF NOT <CRLF> 

3154 O1 DoS zee TST (SP)+ ;;POP <CR><LF> EQUIV 

1 ies ois sent popighadeanh 

3157 01331 105037 013444 eCRB SCHARCNT 53 FAR ¢ HARACTER CO COUNT 

3158 013314 BR i XT 1 

3159 13318 237 913400 S$: JSR pe STYPEC WE TH Hig CHBRACT ER 

3160 o1 123 1156 6S: CMPB tic, (SP)+ $5 bi1S IT IT Ure RFILLE CHARS. ? 

3ibe 613330 eats 001154 eo SNULL , - (SP) a 8 OF F LLER CHARS. NEEDED 

3164 013334 105366 000001 7S: DECB 1(SP) Boe A NOLL ED to BE TYPED’ 

2165 013340 002770 BLT 6$ :! F NO--GO POP THE NULL OFF OF STACK 

Sie? pasue Gpeasy | pisuGS eee 4 SCHARCNT” + BO NOT COUNT AS ® COUNT 

3168 013352 00077 BR $f : LOOP 

3170 ;HORIZONTAL TAB PROCESSOR 

317 13354 112716 o0004 $: MOVB ; ;REPLACE Tas WITH SPACE 

3175 Bi S73? 019900 88: JSR Rc, $1 ¥Pec i; TYPE A SPAC 

3i74 913 3 4 327 z 000007 013444 pire 7° SCHARCNT + RANCH H F NOT AT 

3176 013374 726 TST (5P)+ it POP SPACE OFF STACK 







TALL MOTION TEST TAD-D MACY11 3 Nt) 3-MAR-78 08:36 PAGE 73 SEQ 0073 
Cot hop Plt 33-nar-78 es te RSUTINe SEQ 0073 
0007. r+ 3 ;GET_NEXT CHARACTER 
3178 Hees de 165544 STYPEC: r378 TPS PE WAIT UNTIL PRINTER IS READY 
o00002 165536 MOVB 2(P) © eTPB OAD CHAR TO BE TYPED INTO DATA REG. 
3181 OLS ie 000015 000002 CMPB R,2tsp) 15 CHARACTER A A CARRIAGE RETU 
3 3 o1 013444 crs § CHARCNT Bae AR CHARACTER COUNT 
3188 01 38 122756 000012 o0000e 1S: cnPs Soe $3 pncnif Yes" LINE FEED? 
7 O1s44e 1052 INCB (PC)+ ::COUNT T HARACTER 
3183 Bt Saag AB 550 SCHARCNT: . WORD ‘ + EO URACTER © COUNT STORAGE 
3189 013446 000207 STYPEX: RTS Cc ; 
3131 .SBTTL TTY IiPUT ROUTINE 
ie a 
3138 ; ASO TunRE SuTCH REGISTER CLANGE ROUTINE, OUT 
3198 | #ROU T TERED fine Meee Un 
3193 coy ee a tance In ne nodes id auf TeH” REGISTER TRAP CALL 
3201 013450 922737 000176 901140 2S THE SOFT-SHR SELECTED? 
3505 BLSNER GOST77 165460 B eery 
3204 O1 4 10007! BPL ies $3 on WAIT AROUND 
3S0e OLSNee «faerie iS?ec0 Bree atci7e, (SP) + a3 ai THe AScit 
3207 ee p53 he boone? CMP ii 
3208 013502 O01 te ane be 
3209 013504 1237 001134 o00001 CMPB SAUTOB, #1 taRe He Kelso Tw AUTO-MODE? 
3210 013Sie2 1 BEQ iss 33 
3212 013514 104401 014175 TYPE » $ONTLG CHO THE CONTROL-G (1G) 
3213 013520 LO4s01 014202 SGTSWR: TYPE NT oS ONTENTS 
3214 0135e4 13708 090176 MOV SWREG, - (SP) ce, 
3215 013530 1044 TYPOC 5 gees ascii (ALL DIGITS) 
3216 G13S532 1044C1 014213 TYPE , SMNEW 
3217 013536 OoosOo46 19S: CLR *(SP) CLEAR COUNT 
3218 013540 €LR -(5P) :T gt 
3213 013542 105777 165376 7$: TSTB asTKS : CHAR RE? 
3220 013546 100375 BPL 7§ :;1F NOT TRY AGAIN 
3eee 013550 117746 165372 MOVB asTKB ;PICK UP CHAR 
3223 013554 042716 177600 BIC ofcis? sce :MAKE IT 7-BIT ASCII 
3225 
3226 
3558 Bisees Daipes COCs Oe ne i oe tS CH IF NOT 
3ee9 013566 104401 014170 OYE S$CNTLU >:YES, ECHO CONTROL-U (tU) 
3230 013572 062706 O00006 20S: ADD bé, SP :: IGNORE PREVIOUS INPUT 
3231 013576 000757 BR 19% ::LET’S TRY IT AGAIN 
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3271 
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cZTAD-D MACY11 30A(10S2) 23-MAR-76 08:36 PAGE 74 
:34 TTY INPUT ROUTINE 
000015 10S: CMP (SP), #1S ;;IS IT A_<cR>? 
BNE 16§ :;BRANCH IF NQ 
oo00004 S 4(SP) irY SiS iT HE FIRST CHAR? 
BEQ 413 33 H IF YES 
o00002 165316 MOV (SP), aSWR :;SAVE NEW 
900906 11$: ADD #6, SP :; CLEAR STACK 
1201 14S: TYPE t He CHO <CR> AND <LF> 
001135 000001 CMPB SINTAG, #1 > ;RE- E TTY KBD INTERRUPTS? 
BNE 1S ; | BRANCH NOT 
000100 165274 = nov #100, aSTKS He TENABLE TTY KBD INTERRUPTS 
13400 16S: JSR PC, STYPEC 33 CHAR 
Badoce CMP (SP), #60 i Ghar < 0? 
BLT 18S 33 F YES 
000067 CMP (SP), #67 :;CHAR > 7? 
BGT 18$ $3 F YES 
000069 BIC #60, (SP)+ 33 TRE -OFF ASCII 
oo000e TST 2(SP) 33 HIS THE FIRST CHAR 
BEO 17 +O aNCH Ir YES 
ASL (SP) ;;NO, a | T or 
ASL (SP) 33 9 R TO MAKE 
ASL (SP) :; __ROOM NEW ONE. 
cooooe 17S: INC 2(SP) :iK EP Cc CHAR 
177776 BIS -2(SP), (SP) 33 IN NEW CHAR 
BR 7§ ::GET THE NEXT ONE 
001200 18S: TYPE SQUES >: TYPE ?<CR><LF> 
20 :;SIMULATE CONTROL-U 
.OSABL LSB 
5 5 HEHEHE HE HE HE HE HE He He HE HE He HE HE HE HEHE HE HE HE HE HEH HEHE EE RRR AE EH 
; RTHIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 
* RDCHR ;; INPUT @ SINGLE CHARACTER FROM THE TTY 
we RETURN HERE :;CHARACTER IS ON THE STACK | 
: :;WITH PARITY BIT STRIPPED OFF 
oo0004 oovone MOCHA: FSV § Feds SPep) + Coe — 
165176 1S: rsTe asTks" a FOR 
165172 oo0004 MOVB a$TKB,4(SP) He Hy ee RY 
177600 00000 BIC BtC<1?7> .4(SP) 3;GET RID OF JUNK IF ANY 
000023 che 4(SP), #23 ii gS IT A CONTROL -S? 
165144 2s: TSTB 3S iKs >;WAIT Fok A CHARACTER 
BPL 2s i 19 UNTIL ITS THERE 
165140 MOVB aSTKB, -(SP) He CHARACTER 
177600 BIC atC17?, (SP) i MAKE IT 7-BIT ASCII 
000021 CMP (SP)+, bel ;;IS IT A CONTROL-Q? 
Beté‘é‘S TE NOE come TT 
000004 OO01L4G 3S: CMP 4(SP), #140 ::IS tT UPPER CASE? 
BLT 4S ::BRANCH IF YES 


SEQ 0074 


SE@ 0074 


ad 
eee =9 
i228 


. 


SSIES 


re 


SeePRGEeSRaaca an 
GENE TESRZS Pork 28c 


OOOO NOOOOOOOOO OO OOOO 00000000000 


bb bb bb bb bb 0 bb = bb Pb 


SESSESLELSLSLLELLSLLLLLL LS 


pen 
Sao 


pee 
~—O0ONOUI £Wile-O 
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w 
ee ee ee ee he ee 


Ra 
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Atay 


o0000 
meee 


KO6 


TAD-D MACY11 30A(10S2) 23-MAR-78 09:36 PAGE 75 SEQ 0075 
68.39 ' ny TNPUT Baur INE SEQ 0075 
000004 000175 94 4iSP), #175 3315 IT A SPECIAL CHAR? 

000040 o00004 -, Fr #40, 4(SP) Ho I P ER CASE 
3 Bs econnrsencecnnanecqnceuannnahbasanassonnesnsencqennanenaennnce 
THI 1S ROUTINE WILL INPUT A STRING FROM THE TTY 
te 3 RING FROM THE TTY 
: 33 IRST ocTARACTER WILL BE ON THE STACK 
ie | Re 7 Ha WILL BE A BYTE OF ALL O'S 
SROLIN: MOV ; VE R 
014160 1S: MOV Ratryin: R3 + apy ABORESS 
014170 2s: cre SSTTVING. ,R3 Bint 
DCHR i 0 READ CHARACTER FROM THE TTY 
MOVE (SP)+, (R3) sige! 
000177 10S: CmPB #177, (R3) iT 8 en 
001200 4S: OPE A Ss 4H PEA 
BR fa ;;CLEAR THE BUFFER AND LOOP 
014156 3S: mov (R3), 9S ;;ECHO THE CHARACTER 
. gee BiB. EK FON 
177777 CLRB -1(R3) ;;CLEAR RETURN (THE 15) 
001202 Tyr 1k, - :3T A LINE FEED 
MOV (SP), -(SP) i BBSuSTT STACK AND PUT ADDRESS OF THE 
po00004% oo00002 MOV 4(SP$,2(SP) 33 FIRST ASCII CHARACTER ON IT 
014160 Oo00004 mov aSTTYIN, 4(SP) ; 
95 YT : Hb FOR ASCII CHAR. TO TYPE 
STTYIN: . Ke 8. tRESER 8 BYTES FOR TTY INPUT 
SOEDAF ponBQ2 SMILE! <ESEIE oiWcIES IE) LieShingt -t- 
053823 aie SMSWR: ASC 185 1B) Sehr =/ 
047040 OS3SOS SMNEW: .ASCIZ / NEW = / 
000040 


-SBTTL READ AN OCTAL NUMBER FROM THE TTY 


Oe aE Se SE gE aE SE 0b a aE a a bg a a a a a a a aa aH a HH 
: ATHIS RoyT INE | |e al AN OCTAL (ASCII) NUMBER FROM THE TTY AND 


o RDOCT ;;READ AN 
:# RETURN HERE 3;LOW Re ert ON TOP OF THE STACK 
ia tt ETGH ORDER Ts Ar ARE ON SHIOCT 
SRDOCT: MOV (SP), -(SP) 3 PROV IOE SPACE FOR THE 
o00004 o00002 MOV 4(SP$.2(SP) INPU R 
MOV RO, -( SP) ; PUSH RO ON eTACK 
MOV Ri’-(SP) :P Ri ON STACK 
MOV R2'-(SP) :;PUSH Re ON STACK 


NB 
=o 
g 
A 
- 


ida esd iaier er 


CRE 


o- 
£ 
fu 


P+ 4 


SER 
2 


Seo ehte! 
raat 


bo 


ONOOOOAOO OOO OO OOO O0C000000 + 


bh bb bh Pb hh 


SEELELSLELELES 


Ww 

ww) 
ah 
<M 


CZTAD-D MACY11 30A(10S2) Ee pe J 08: 36 sg 76 SEQ 0076 
08:34 READ oc HE TTY SEQ@ 0076 


-78 AN AL NUMBER FROM T 
o44 1S: ROLIN ;;READ AN ASCIZ LINE 
MOV (SP)+,RO ::GET RODRESS OF 1ST CHARACTER 
te pasta 
2s: MOVB (RO)+, -(SP) ;;PICKUP_TH HARACTER 
rt é BEG = iI ee RO ab? rit 
L 1 s;#e 
102 ROL Re 
pat R 5384 
R R 
1 ASL R1 3328 
102 RO Re 
16 177770 BI #fC7, (SP) ;;STRIP THE ASCII JUNK 
Oeee01 8 SoP)+, Ru 3 IN THIS DIGIT 
26 3S: TST (SP)+ ::CLEAN TERMINATOR FROM STACK 
0166 900012 MOV RL, Je(SP) ;;SAVE THE RESULT 
i4 MOV R 10cT 
2602 MOV (SP)+, Re 33P TACK INTO Re 
sPOh MOV ( + RA 33P TACK INTO R: 
MOV (8P)4°R !iPOP STACK INTO RO 
o0000e RTI ; ; RETURN 
000006 SHIOCT: .WORD 0 ::HIGH ORDER BITS GO HERE 


TAL1 MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE 77 SEQ 0077 
CZTADOD.P1i1 23-MAR-78 08:34 BINARY TO OCTAL (ASCII) AND TYPE SEQ 0077 


-SBTTL BINARY TO OCTAL (ASCII) AND TYPE 
[ocsnuaunennennstanoatansersecetsw en ett Garey SAPUER te & bad 


3374 :ATHES, ROUT i) AMBER AS 16-BIT BINARY NUMBER TO A 6-DIGIT 

Le jaSTvPOS---EN ER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
:# MOV NUM, - (SP) ; yg ee {o, pA 

Fle 3% TYPOS . ; He asi 

3377 3% .BYT N 33 Ns =] 8 FOR NUMBER OF DIGITS TO TYPE 

3378 : : .BYT M ;3M=1 + ERO 
; ‘a= 

3380 : AE UPBRESS L ifRofNe ZEROS 


#$TYP Anon EVES HERE TO TYPE OUT WITH THe SAME PARAMETERS AS THE LAST 
+ hey OR STYPOC 


: 





3338 : TOS ON NUM, - (SP) ; 5 NUMBER OR TeBeOUT 

3388 j #STYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 

3303 > #CALL 

a Ho" oy, MuN.=(SP) NBER TOE TyPED 
3392 ’ 

33393 014326 0176 STYPOS: MOV a(SP),-(SP) CK 

ae Bitses tise A COR dt ASSAD! bleh ae atcue 
33% O143S44 062716 ADD 8s (SP) : ADJUST RETURN RODRE 

Be fie FES croc: Rie Py a eigen 
300 0136 Lig7a7 STYPON: nove e5;S0cnt . nat BS ‘s Sixce) brciTs 
SiGe 014376 O14 HOV Ra; - (SP) He 

3uoa BE S88 019546 014553 ve bE +1, R4 i338 is NUMBER OF DIGITS TO TYPE 
oe pte gt A yess NBS on RY 'BT T MAX. ALLOWED 
woe Grails tity? Bites Rog BH, Soroe “BY Tee ee Fi sures 
3403 O14424 1660S o0000ie MOV 12(SP),RS BEG ipe 

3410 TPs CLR R3 ts LEAR Th Put NOR 
sik Beas 1S: ROL Re eee TES f.TE ie “—" 

ia Bins Belle - 8 & Hee ine sents 

3415S 014442 006105 ROL RS 

is ie Bios » & Be : 

3419 Siss ma '  DECB. = SOMODE it ire “Hs olalte 
aig0 Ouse tte 177770 be 8177770, R3 Ger RID OF JUNK 

os GSS Bree BOS aes 


4 
- 
a 


oO 

N 

a 

. 

v 
ae ee SREREREREEEEGE ~ 


ue 


00000 00.30000000000000 


fu 
N“N 


tear EER 


aes 


ESERIES ERIPP SERS HH 
SBBVERPORH BSS 


rie 

ae 
Ses 
4 4550 
S443 izes 
S444 4SSe 


= 


85o- 
pier 


a 


ST CZTAD-D MACY11 30A(10S2) 
23-MAR-78 08:34 BI 


DOD0END 
4 + 4h 
HOODOO 


O14S46 


Bi4sss 


ooocode 000004 


23-MAR-78 08:36 PAGE 78 SEQ 0078 


NARY TO OCTAL (ASCII) AND TYPE 


4S: RY ;;DON'’T Aerts ANYMORE 0’°S 
, + 3 BRN TH T ASCI 
SS: pis Han: t hake 8 i Te toh heavy 
TYEE 34 He Ve THIS DIGIT 
7$: Cc $OtnT i BB un 1 
BGT es ie IF Done TO DO 
Nc 4 :; INSURE LAST DIGIT ISN’T A BLANK 
BR 2s :;G0 bo THE LAST DIGIT 
6S: MOV (SP)¢,RS 33 RS 
Mov CSP )s° ad RECTOR Ra 
MOV 2(SP),4(SP) 3;SET THE STACK FOR RETURNING 
HOV (SP)+, (SP) 
RTI TURN 


;3RE 
+ TORO E TOR FOR TYPE ROUTINE 
aocr nt s3QCTAL DIGIT COUNTER 
SOMODE: WOR :;NUMBER 5F Braye TO TYPE 


8s: “BVTE 6 
.BYT 
SOCNT: .BYT 9 


SE@ 0078 


Ro 


ves ane - a MACYI1 398 Ac 40582 wn 08: Pls 79 
-SBTTL TRAP DECODER 


ee ge AT Ne ik hago wanes eee 


e 
a] 
“3 





Ss 
:#GO TO T 
1 STRAP: RO,-(SP) ; 
4 01 v ec -RO 33 ¥e i 
i nove (RO, fO HH TRAP 
i STRPAD(RO) RO itn Ni 
1 Rov £5 335 ee 
3461 
;;THIS IS USE TO HANDLE THE “GETPRI™ MACRO 
14S76 011646 STRAP2: MOV (SP),- 33 T DOWN 
Bi 4e08 016666 o00004 o00002 MOV 4(SP5, S?E) tinOve THe PSH DOM 
014606 G0000e2 RTI ;;RESTORE THE PSW 


-SBTTL TRAP TABLE 
;*#THIS T CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
; #BY Fue e TRAP INSTRUCTION. 


Sseteeeek 





3471 
Be 7 

75 O14610 014576 TRPAD: TRAP2 
3476 Bideis 1320 . ALL=T TRAP+ TTY TYPEOQUT ROUTINE 
3172 OlWb1s §O1435e Sat st TRAP+ TYPE OCTAL NUMBER (WITH 

78 014616 O14 ALL=T TRAP+ T TAL (NO LE 
3479 014620 014366 CALL2TYPON  TRAP+4 TYPE OCTAL NUMBER (AS PE 
3181 O1MG22 013520 CALL=GTSWR  TRAPSS GET SOFT-SWR SETTING 
3483 O01 13450 TRAP TEST F IN _SOFT- 
Hei Bidese 13730 3 THY TYPEIN R ROUT! 
3485S 0146 140S2 N TRAP? ) TTY N_STRING INE 
3186 Ot 14 T TRAP+ ) T FROM TT 
3488 01 ibes4 Eetteunive TRAPS TO WRITE, A BLOCK OF DAT 
3489 iwe4Q 910774 TRAP ) T A BLOCK 
34390 0146 11304 SEAL TRAP+ ) T A 
3491 O14644 011366 CALL TRAP +1 ) TO A_BLOCK 
313¢ 0146 11438 ;CALL= TROP+ ) 19 FWO A FI 
3493 0146 11 ;CALL= TRAP+ ) T FWO A_BL 
34H 0146 14600 ;CALL®REWIND TRAP+ ) TO NO THE TAPE 
Be Biice Bless TERLLSBELDRS  TRSbseS(IRWES) COWOANE RPad AS" 

ee = 

3497 014660 010106 ;;CALL=SETLOOP TRAP+24( 104424) SETUP TO LOOP AS PE 








07 





TALI MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 08. 36 PEGE BQ SEQ 0080 
CZTADO.P11 23-MAR-78 08:34 POWER DOWN AND UP ROUTI SEQ 0080 
3438 .SBTTL POWER DOWN AND UP ROUTINES 
ee HR Tae RTT cejaeramvec i,att Fon rect 
i 01 01S026 900024 LUP , J8PWRVEC T FOR FAST UP 
_ oO! 1 539 000340 oc0002e6 MOV $x SePWRVEC +e tbRiO: 7 
3008 i 1 MOV ,~ (SP) 33 20 ON STACK 
i 10146 MOV Ri, -(SP) 33 R TACK 
3508 1 1 v *-(5P) 33 Re TACK 
re 8 my aiciee) | HUURN ah Sra 
3503 1 1 MOV = {38} He Stack 
1 1 1 64222 MOV -(SP) 33 ON STACK 
351 1 1 15032 3 3 SAVE 
3e! i 014734 o00024 MOV SSPWRUP, JEPWRVEC': ;SET UP VECTOR 
3o18 01 000776 --2 ;;HANG UP 
18 $3 RKTKRAKRKAKKSLAEAKKASAAKAAASSAKAAAAASHE RHKALEKRAKARHAKAFSKKEFLEE EE 
i *POWER UP ROU 
18 014734 0127 000024 $PWRUP: MOV $j 
3243 Bh iSue CLR + 
3Se2 14 015032 1s ane b 38 
ry BY 164154 MOV ie. asMR 3 ofp 
3524 014764 012605 MOV (SP)+/RS 3;POP STACK INTO RS 
14 1 Vv (SP)+,R4 5 BOP T NTO Re 
14 i Vv ( a 33 TACK INTO R3 . 
g Birr Bt my faeitiag = Eibge reek INS 
353 b177e B16 014662 o00024 NOY (3033.80 vec! 5 K JMS Bo DOWN VECTOR 
3531 O1 0 000340 000026 MOV 8340, JSPWRVEC+2 BRT oP 
O1 14 i 1 TYPE ; Pont R FAILUPF 
15016 01503 SPWRMG: . SPOWER 33 R ree MESSAGE POINTER 
ot Det 7 MOV (PC) + , (SP) nm ART AT PWRST 
0189¢e SPWRAD: gtoRO ::RESTART ADORES 
3537 o1 SILLUP: HALT ; THE POWER "buck Sok WAS STARTED 
3538 O1 .-2 : BEFORE T R DOWN WAS COMPLETE 
3539 Cl SSAVRE: O 3 OOS THE SP HE 
015034 0050 047520 O42527 SPOWER: .ASCIZ <15><«12>“POWER” 


maths] 
: 
g 
rou 


F EVEN 





DO? 


TALL MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE 81 SEQ 0081 
CZTADO.Pil 23-MAR-78 08:34 DATA TABLE POINTERS FOR ERRORS SEQ 0081 
mS 3 j REEREEALAAALEA REL AAAA AAAS ARE AAA AAA A ALAA ERLE A EERE ERE ERE EE 
“8 ;DATA POINTERS 
4 1 1 001'62 OT: -WORD SAVPC,SERRPC, SREGO, SREG1,O 
Sei, BIER GRIER ORAS 
3850 O01 1 001116 001162 OTe: -WORD SAVPC,SERRPC, SREGO, SGDDAT, SBODAT, BYTNUM,O 
8} O01ie6 O01e06 
015074 001204 001116 OO01162 DT3: -WORD SAVPC,SERRPC, SREGO,RCRCO,RCRC1,RCRC2,O 
612108 O00ie10 OOlele OO0lel4 
357 18119 000000 
O01Sile 1204 001116 001162 OT: -WORD SAVPC,SERRPC,SREGO,SREG1,STMPO,O0 
3889 B1ei20 Bol 164 001166 000000 
3561 O1S5i2e6 001204 O01116 O TS: . WOR AVPC, SERRPC, SREGO, 
See> o1eiss 900000 O11be OD ORD S $ C,SREGO,O 


ey 





O07 


TALL MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGE Ge SEQ 0082 
cz A Pil 23-MAR-78 08:34 ase MESSAGES SEQ 0082 
5 FESR HE EAE JE ES JE 06 AE SE A JE EE JE J EE a 


; MESSAGES 

MSGDRV: .ASCIZ <CRLF>"DRIVE(S)? 
MSGASK: .ASCIZ <15><12@>/TACS?” 
MSGVEC: .ASCIZ /VECTOR?/ 

MSGPRI: .ASCIZ /PRIORITY?/ 

MTACS: .ASCIZ 7 TACS=/ 

MTADB: .ASCIZ 7 TADB=/ 

MTAVEC: .ASCIZ 7 VECTOR=/ 

MTAPRI: .ASCIZ / PRIORITY=/ 


aeaeeeee 8 


MSGOK: .ASCIZ <15><12>/0K?/ 
MYES: -ASCIZ /YES/<CRLF> 
MTSTORV: -ASCIZ ¢15><12>/TESTING DRIVE / 


MANDRV: .ASCIZ 7 AND DRIVE / 
MTEST: .ASCIZ <15><12>/TEST PC?/ 
MLOOP: .ASCIZ <15><12>/LO0P PC7/ 
MXRWND: .ASCIZ /REWIND/ 

MXWRIT: .ASCIZ /WRITE/ 






MXREAD: 3303 7READZ s 
MXSFFG: .ASCIZ /SPACE-FWO-F ILE-GAP/ 


SRIReeORE 


—e 


MXSFBG: .ASCIZ /SPACE-FWO-BLK-GAP/ 


GECRRTERCOSBURAERS ABARAT DRE Boa los 
2 


DOODOOOOOOOOOOOOOOOOOOOOOQMOO OO OOOO OOO0000000000000000 


be be bb bs Be bs be he Be be be he ee Be Be be he fe be be be be be bm he he be he hh hb he eh he he Pe 


04 

641801 13. MXBSFG: .ASCIZ /BACK-SPACE-FILE-GAP/ 
10 easy : 2514 043455 
361e 1 1501 Si M G: .ASC /BACK-SPACE- -GAP/ 
3E15 gsie3 oat ‘ OSEs08 XBSB SCIZ /BACK-SPACE-BLK-G 
is Bistss Eapiag SeeLs osteo? 
3616 $S0e 0511 js “ _ 
sei? 2210 Oe at Se pegsos MXWFG ASCIZ /WRITE-FILE-GAP/ 
3618 5516 050101 000 
3619 $Se1 102 O4312S O42506 MBUFCK: .ASCIZ /BUFFER COMPARE / 


FO? 


SE@ 0083 


ru) 
re) 
re} 
a 
° 
w 
w 
5 
“~ 
an 
—s 
Xx 
\ Pre) 
u a 
~. e § = 
Ps 4 @ 
\ rr} Pc) wi 
> 8 aes. é 
z a 3 = a \ = Ww 
ran 4 oO bot req la v oO 
™ e Oo uw wi N a 
@o - oO ‘\ oO oat w co 
: $s e, = 8 - 
|, « @ bet * 8 £6 2 € 3 
a « a @e« sg ¢ wv re) ro) 
f- 2°25 SS 6 8.8 a 8 2 8 
a - ww - - a fo «& Ww 
ry cc (4 co & w w a wo 
a 2 a re i H z a & ral 5 u 
nh FP REE tog bg a Pa 
rc} o o s ©& 6 5 Fs “i o S 2 Aw 
oa = = - z c ~ ~ @ an a ww (Ss) 
Rw r= Fer) 7 mS a Q = ou @ «+ a 
at “ » “N “‘ * %, 4 “N 7~ ‘ “XN 4 vs “ 
2 N N N N WN N N N oN NN N oH ON 
fo i nl ol Lon) mM _ - onl on) onl — Land | eae Lon) 
hd Lal 13) © 2) .*] oO Oo oO oO oO Oo oO oO VO Y 
wo o mi) nan oO 7) ma) wn ww HH H wo i) 
a = = Ss © ¢ <= < s ¢ ss . = <= 
Hi 
Oo a ee ae 
poe ae ae eg 8:2 88 fee 
a = - , £ # a = : EE Er =z 
3 Ww rrY] uw Ww Fry] wu ww Ww 
; az ae 8 ZayNy 2 rt ei ou Bey 28s uN = on eds 
a al + =4 oa “et 20 Bey zB% Son kand wn _ uw 
2 8 #3 3 zz oe 2 Ua 58 Se ReoRe 
a FS 62 444 4 68 2B OS 3 
ra) 
7 r or tu Ay] = 
ee Se SE ee ee ec 
 «- -* 2 _ hand ur 
8 auuess 228 geae 8S Be 


Rus Riis 3 + BNRZS zi“ sou 
| Rial das Wet Fiat oe 
"eB mortieecturehednath yenRRasig 


SaddscssdasssassesessescscSscscascsss 


£3 ” ToO=uMsrW 
-f SERRATE TTR TIT saanee 








GO? 





TA TION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 08:36 PAGF 84 SEQ 0084 
crttoo Plt 23-MAR-78 08:34 ASCII MESSAGES SEQ 0084 
DHe: -ASCII <«15><1a@ 
3e35 pi eles .ASCII /TEST ERROR EXPT’D RCV’D BYTE/<15><12> 
1 
378 Ot 
3680 : 
3681 016214 
ze 
1 
3E8e oI .ASCIZ /PC PC TACS DATA DATA NUMBER/<15><« 12> 
1 
a ‘ 
16264 
1 
36 1 
3691 O1 : 
3636 16318 
Ee i DH3 ASCII <15><12> 
39S Ol "ASCII /TEST ERROR WRITE READ TUBO’<15><12> 
3698 1 
330 01 
5B tne 
37a2 Ol 
3703 Bless .ASCIZ /PC PC TACS CRC CRC CRC/<15><12> 
3705S O16416 
3706 016424 
3707 016432 
ves Blew 
att OLEYeL DHY ASCII <«15><12a> 
$ ° < < 
at 15499 ASCII /TEST ERROR BYTES’<15><1la> 
ro) i 
3715 O16S04 
3716 016512 
3717 016520 
3718 O16 
3713 t -ASCIZ /PC PC TACS TADB LEFT/<15><12> 
3721 O16546 
3752 Olesen 
37e3 Ol 
3724 168 
37e5 O1 
3726 O16601 DHS: -ASCII <15><12> 
3727 016603 Fa] 051508 020124 ASCII /TEST ERROR’ <15><12> 
28 016610 3 0Siie2e 
3729 016618 ee 1S 
3730 Oibbe2e O41S20 Oe 020040 .ASCIZ /PC PC TACS/<15><1e> 
3731 0316630 O20C40 041520 O20040 





O07 


TAL1 MOTION TEST CZTAD-D MACY11 30A(10S2) 23-MAR-78 09:36 PAGE 85 SEQ 008S | 
CZTADO.Pi1 23-MAR-78 08:34 ASCII MESSAGES SEQ 008S 


37 016636 O20040 O2e0040 O40Se4 
Le 016644 Nitta 00so01S 000 


7 166Se - EVEN 

ce 0166S2 001116 001220 OO0000 OT201: .WORD SERRPC, TACSL,O 

323 016660 001116 000000 OT202: .WORD SERRPC,O 

37 016664 O40S24 030461 O43040 EM201: .ASCIZ “TALI FAILED TO RESPOND” 
3740 0166 O44S01 042514 020104 

3741 is e i: 0S1 

3743 167 ll i? 0331 EM202: .ASCIZ “NO DRIVE AVAILABLE” 
744 167, OS3111 1 101 

374S 167 O04 1 oO40514 046102 

3746 016734 000105 

3747 016736 041520 O20040 O2004O ODH20l: .ASCIZ /PC TACS/ 
3748 pibza4 040S2e4 051503 

3749 016752 

3750 016753 120 000103 OH202: .ASCIZ /PCV 

3751 EVEN 


SEQ 0086 


SEQ 0086 


5 


PAGE 86 
RS AND LINK 


I0?7 


Y (10S2)_ 23-MAR-78 _O8: 
a, et READ AND WRITE BUFFE 


~ 
~ 


-D MA 


- tu ~™ r w 
we wu wu iTS ie 
p= | = | = ol P| 
a @ @ (D oa 
e = = = a 4 2 
x 4 4 i! 4 « [4 
[VY] °o oO °o © Oo 
~ wu & we iTS i 
~ lJ tu ly 
a ra} 3 9g Qo Oo 
uJ a i be ar az 
wr 4 x c (c it 4 
<I- °o o oO Oo oO 
-ca - - = b- - 
~~ w w w wn w 
or oO oO oO Oo 12) 
o 14 t' 4 a « 1 4 
w oO oO Oo oO oO 
mo - - _ = - 
wat 
aw 
ar 
a 
co 
He 
9 
zw 
aed 
en 
a> 
qm 
— 
w>- 

-=OoO- -OoO- =-O-0 =-OoO- o-0- 
ty =“=O- -O- e- = -O- =-0-0 
<x =0O-0 =-OoO- =O- o-0- o-0- 
- =0-0 -O- “-O- o-0- =0-0O 

e =O- ~ “4 =-0-0O o-0- 
oo =-O- -O- — = =O =0-0 
-=z =-—0O-0 -=OoO- =O- =-O- o-0- 
-—u . °° aon ao om @ ooanm 
ze oo + @O@ ee -+¢2¢+0 ae tO) e+eeO e-ee¢e(9 aT as | 
— or tur -uor 
gi pephey =~WDO 4 =wWO 

i nd -e eeeneneeeneeneneeneeenee 

w 9 MUM FT INDI) FT LNW X WWWWO ay amy ae WWWWO WWD WWWWO 
+4 \ ana aes | 4 a. an) an a errr aul an a eee 
a ipipins aintnin S >>>> > >->>¢ >>>>O 
~ amon Onno: a2oonm PesTostesles be aonno= 
) w 

Sua é 

w =UMNTFTMOX“UMTUMOX uw - = tf um oO Fr rw w 
SYD ZFFFFFSFSEFEFE SS 4 & 5 & 5 2 5 a 5 a 
ae 55 5 @ o ® o ® o ® o @ o 
oe CRCRERR AIRS | $& = a = | 2 2 3 





laa is i as 
SSSSReRRerree © RREEEE BREEEE BRBBER BBSSES BRree 


ct et Peta Det et et tlt etn dete Ip ett SMe geet ated eteteteteged edetetededeg (edad ond ont wd ot 


OO000000000000 QE00000 F00000 G800000 C0O0000 2002000 


| SRRBRRRES S005 80 29k UC ROR PRR SURE RES BER ABET RRR RRR ERBEESS 


AM MOMMA MMO MMMM MrMl mm MMMMmm BT IMMMMMmM™ 


—— 


SEQ 0087 


SEQ 0087 


PAGE 87 
D LINKS 


JO? 


-MAR-78 OF; 36 
READ AND WRITE BUFFERS AN 


CZTAD-D MACY11 30A(10S2) 


23-MAR-78 08:34 


TEST 


;CRC STORAGE FOR WBUFE 


WWWWO WWWwWO Oooonnm 
 ananan’ 4 eee xxxxxx uw a 
pinta >>>> asaaaa wz 
oooan oaoan ona ee vY) 
5 
r,) o x x AMT MD « 
Ss g¢5 & SsS555 D 
@ Oo @ oO jee] @ az 
= = os = aQeeceen 


ORRSe8 S9889a 8S 
mien 


BS88SS SAA=A5 ARAN 


O00000 92800000 oo000 


sadaaaaaaaaNaaaaNaAneees 


020534 
000001 


SE@ 0088 


n.™m 
TWROT FW WO 
See) tet 
@ 
_ @ 
Oo 
oO =MUD = Mo 
wuTow ow wm 
oS Twro Tw WO 
Ww cone hen ee “—— fu 
Ww 
2 
vw oroonm 
TwWwoCcer TrwWFTroO 
SAY te) TU 
=OMOM 82708 
CMmO0TrW Toro 
OMWODO TWTRM 
tt te tet ee 
WRWMO TAT OU 
o-Th. KTRwWoe 
MMOD TWKRRO 
tte ttt nt 
a 
UMOWN CORO 
RMN FOW-w 
MMWDO TFTWKRROT 
ttt ttt tf") 
w RRORM OF Cou- 
a fo ap gi TMmM-—wWw 
vo WMODO FTWR.AROO 
=2 St tt ts a) 
> 
nh go 
oO ag bony = vwoooaw OOOO 
Se) “ PY BR FUNDS 
a -_ tf tt rae) 
er | 
@ 
Oo a 7 
Ww ~n wo > mr. o- om Rr. @-O07 00 
J — OOM ”m” —™ _— FTF oo —“OnN TW 
oo ~ o- oOo -@® — tf or Twwo oO 
~< tw t- — tutm wu tf tet tt tee 
c 
aw 
Eo 7 
iz o o-9 fu wo wo tr x FwWOoMTC FAS er ™ 
Mus = @OF oO «+4 —~ ww Lh] mom @ 
uc wu @o- oOo -- “ @ orn zz 
uJ uw we = tutm jw tw tu a pet A ™ 
- 
- wl 
w Dooco band FOU -OC Or rF woo bee or o- 
“Ww fue pm ™ 8 Poorer we weD tun orm ¥ DOOR AS ro 
~O Xs ta O OO RARARARARARAR We fu--tu wn tu- 
= u-tutu- —“ frm tute tat ttt tnt unm 
™ 
= rn mur x OC OR OWT MMU ™ oo oo ODM Ore je 
—_ “a 7 
> ttt wen ii") ee CHEESE ES Dowoor 3 pe ne Fas @ 
tot =O O RKRARARAAARAKR KRRARRK = w- 
¢ tum SHti-t-t <t be hee ee been ee toe De Doe Dee | -— wm 
Qo 
Oz gah Ton snot SES BRT ONO SE BR SESS SPs ONE 7 BopormuT CGT SS 
qm Sane a Beerze ™ ae tu Jr rr rat zx RRs Pert 0m om 
KRARA-ARARAKR RARER RRR ipo + inme tt Oh. 
NB en fu- A tt tt ti eee i’ | 
oO 
@ 
n 
g 
t 
-™ 
wm 
uJ 
e 


ON 
1 


re 
Pepe 


TI 
-Pl 


1 MO 





Se ee 


ey a RR RE EERE E EEE Eee ee ee 


secee SSBSEBSSBE_S=UOZ uns o.on ors 


PRR RRR EEE RRR EEE EEE SY 
papeetestetetet tet ent ete ated atertatet eater atta 
Peyeleleleleyleleteleleteleleteleleyeteleyeleyeter) 


104416 


BPTVEC= 000014 
BSBG 
BSFG 


LO? 
TEST nar-7e BELaR O MACE SRA OS RD RENCE TABLE == USER SYMBOLS 
a 
932 953 


3 946 960 


E 


eotaod. 


. 

oOo =H 
_- ~~ 
ru 

fu 

wu 


2470 
36668 


“ 
~ 
eres 
does 
es 
ee 
_n@ 


ef 


2224s 
2626 


eee 
VIE 


——frru 
-_ 
% 


26S0 2671 2735 286e8 


eee 
ie ae 
ee te 


BERNeR Sas 


gNs 
2a 
Rg3 


ke 
retotatatatotatet- Me = [=f] 


ego 
58a 


1178 1199 1217 2e98* 2303 


1227 
948 


Z 


9s5 362 


Seen? 
3888 
Sanaa 


ee 
- 
fu 
Seeeaeeeeeaesescat eseceaesc 


MEMErVEry ery: oO 
3233232334 
—uI 
ul uv 
peeges 
Inve 
wowown 
SReorS 
won--o 
roa 
wut 
w yt 


2 


Es 


eee ara 


rae sasee es 
ee 
THe 


1133* 2157# 


q 
rer 
Rag 


=e 
cs 


2741 


Tel 


Beira 


BaRe 


348S 
2es6S 


WwW 
NION 
4e5* 

oor 
* 
H—-We 
we 
<@ 
wow 


SEQ 0089 


2317 


3486 
2875 


SEQ 0089 


2321 


3487 
e3e4 





TALL MOTION TEST CZTAD-D MACY11 30A(10S2) 2@3-MAR-78 08:36 PAGE 91 SE@ 0090 
CZTADD.P11 23-MAR-78 08:34 CROSS REFERENCE TABLE -- USER SYMBOLS SE@ 0090 


GTSWR = 104405 fees | Soqu 3107 IG NBs 
o 


19" 
+ al 10 124 % Se 
4 . oe ArT 2627 2665 
TF ens 000100 P 257i 2522 2545 2569 2594 2627 2651 2672 2687 2708 2736 2865 
IOTVEC= es 1 de 1044# 
ine ere 234 rt) 
LEADER= G20000 ® e221 2638 2731 2746 2928 2955 2979 3010 3013 3037 3043 3066 
LF = 000012 6658 18S 
LOCNT 012006 e750% 7e7e 27778 
Hrs ts ggg: Size gysge ays7s 
MANUAL Oos3e5 if T1938 
reuse 1 : 2i33" ise 12438 1244% 1245* 12718 2761 27798 
UNE” 2578 * 25208 2535* 2582s 2649 26708 2685" 2706% 2724s 
MLOOP 15331 ® 
15152 3 8 
15136 & 
MSGID 1079 109ie8 1198 
MSGOK 015246 377 “ 
MOGPRI 1517; 353 ® 
mTacs” Bi oes 
reer S1er3 
RTAVEC pies3s 37 8 
15316 2 
MT 1 4 a 
i 8 
reese et 
MXRWND 015344 even 35958 
nXSEBG O15411 2 a 
raG. igeos se8c att) 
MXWRIT 015353 ‘ 
NeXt 2 1 . 23158 
NOTA 2305 2308s 
NOTEGL poe ia $302 3i5° 3198 2322 
OF FLIN= 78Se syi2 5248 
OK il 11968 
PIRQ = 8 v 
PIRQVE= 6S 
PRO = 6888 
PRI = OO0040 6898 
PR2 = 000100 6908 





T TION TEST CZTAD-D MACY11 30A(10S2) 3-MAR-7' 08:36 PAGE 932 SE@ 0091 

cota porte €35-naR-7e 08:34 CRO OSE) ERENCE TABLE -- USER SYMBOLS SEQ 0091 

PR3 = 0001 691le 

PRY = pure 692 

PRS = 000240 6938 

a an: 

PS a i r 663 1202 1250 1254s 2S23% 2546s essl# 2570% 2595 2601 2629% 2bSe* 
2673% eb8se# 2709% 2737% 2863 

PSH = o95308 \ ae i 

PuRveCs r] Ba. 1050 3502 3503% 3512 3518% 3530* 3531% 

RBUF 1 piise 3757 3783. 38248 

REUES = OLsee4 585 : 

RBUFY 0150 a : 

RERCO 001210 7ee : 3554 

RCRC1 OOlele 8798 * 3554 

1214 a % * 5 
= } 7 § uy Ve 
IN = 10 43 4S 346Se 

RDOCT = 104411 2331 2 2354 34668 

ROSUB 012522 Seo 7 

READ = 104414 1 1 1 1338 fre 2 ¢ 1371 1384 90 1404 1420 
Ea CRE A ee 
1987 " 195 1 1 3e3 1 1 1 4838 4833 A87E 4822 4359 43 

i pone 8 oeo8 2108 2213 2768 2792 2877 29eS 2953 2975 3007 3033 3063 

npn ecce $00 «=«stg03s if30s1aa3 14g 13901398 t28Bs«teSD = sidee «= Ses steal 
1619 l6e1 1248 164 1e22 165 16 4 67 126? 1 3} 1399 137¢ 1$93 
leer of 4 C4, C4 ¢ yh 

RGPBLK 012702 B83 ieore 4395 ky 

RLNKX 017006 2977 0 3 a 37638 

RLNK1 016756 1 296 1307 1303 1 1388 1333 1335 1338 1340 1393 13S3 1356 
1388 1371 1373 1 1 1 14 142e 1461 1483 1Sle 1814 1529 
1331 1$57 1$s9 13/3 1s 1589 1$33 160e 1604 1622 1624 1662 166 
ioe 7ee2 non a2 7 36 1761 177 1777 1792 1794 1953 19SsS 

RLNK2 016762 1390 1 1 14 4 ey, 4 1451 1133 1466 1468 1168 1487 1506 
1308 i a8 i. i 4 . 1 1611 162 1631 164S 164 1681 1683 

RLNK3 016766 14 1494 1 1563 61 4923 1836 1838 1854 1856 1872 1874 1963 
196 1996 1 204 7 } & 

RLNKY 016772 14 1S01 1S4 1544 1 Od 170 pb at 1949 4388 1970 37608 

RLNKS 016776 1549 158) 1922 1 192 3 38 2040 37618 

RLNK6 017002 2032 2034 4 

SORES a ie. 

LG OO] @ 1237% 1264" 2474s 24778 2729 2733% 2881 
SAVPC 001204 m4 sean" soos" $319* 2534s eSs8l# e646 2669 2684s 270S* 2723* 269S* 3547 


SEQ 0092 
SEQ 9092 


608 


CoB oEES" *$3-non-re Sra > CY!! “BRSER RereREnce THeLe =~ USER SYMBOLS 


* 

om i=) wo 
teu 8 BS ue, i... 
A 4 = = um 4 2 
oo > 't + 
ss 6B re ate ® 
rn. @ =O oO it) 
“toe — um 4 tu 
Tor wo- tw -_ @ a 
=o * = won Oo m= =o 
Two o ® =O Oo oO wW 
ere) “_ unm ™ ™ tw 
“ w ow o wo a 
rem a = ri Two = » 
DO" @ -@ * ow 
dee ae tie um tw 

rT x o @ 
Bind ™ re *, “4 . ae 
0 NOR 2 << a BS 
ere ~— 9 cut tf ™ Ww 
s ia 
“a x Las wo worm FT o oO 
DB x 3 aK ow >. & 8 
enone -_ Sam ™ wm ™ tu ju tw 


347 
Bes 
1700 
oe 
3oe8 
3000 
eis 
5224 
3201 
2366 
2948 
2350% 


ie 
1 
1699 
1736 
Eh ab 
030 
2978 
1083 
10 
3116 
2339 
2920 
1260# 


1316 
1 

1 

i 

1679 
171 
1318 
i. 
3105 
2336% 
2369 
1246s 


os Be eB a 
eee ESE ERE: Be 


2483 


ze s «28 * oe 
Co mtu- On onT ps ur 7-0 
3 Att mt ts oy 
TT > — RAARARARARARLALD oO, oO 
te oe een kon Kg fo U- [M-4t-te 


ae saesasee8 

- OF MMMlMU—O' UMU-0O0'O-OCO@r.onTy Last 
ORS RRE Base rase sabuoa RRR PRR RREAPRRE SOR RENN RR Rae COeeR 
el ee at et s unm ™ LY) 





eae aa 
sae SEE 


8 a5 br oO-mmTrTw = 
ELEC ME CETEE CEE ES EEEEEE PETE eRe 


oe44 
° 422 
12340 
pe 
= 104417 


1 
e 
= 1 
zi 


v8. 
ies 


TREE ROTION TEST on-7e SBSR RYN ORS AO Rite cRENCE TALE =~ UsEk Smddcs 


TSI “VEe= 000014 
TIMERR= 002000 
TKVEC = 


ee ee 
NOU £WITUEO 


S444 4 tt ttt tt tt 


iis 
3 *deneenee yore aS 


= 


444444 


TYPOC = 104402 
TYPON = 104404 
TYPOS = 104403 
T.BLKC 010362 
T.6SBG 011366 
T.BSFG 011304 
T.READ 010774 
T.RWND 011600 





7568 
7648 


4@ 
4 


33 


tic 


3 
£ 
OW) 


ReugRaaie ees 


Ds bb bb be b= be be ho = be he b= = Po hh hh b= B— Po hh 


P 
w 


ras act ook 


ID I ee ee ee ee ee ee ee ee ee ee en he he ee ee 


G 
N 
or 


14428 


Recta aot Airs 


: 
= 
£ 


Res GU CRT SS 


a 


Sa 


PURVETU Nie 9 
3 


eS 


Sere? 
Fitetot 


3555 
S038 


2376 


COS 


4558 
5u7ee 


3215 


3 BY Bl RE ORE 
$532 * 


‘34778 


SEQ 0093 


SE@ 0093 





23-MAR-78 08:36 PAGE 95 
CROSS REFERENCE TABLE -- USER SYMBOLS 


CZTAD-D MACY11 30A( 1052) 


23-MAR-76 06:34 


i 
w 
[vv] 
= 
FS 
- 
— 
2 
—~ 
a 
a 
e 


ree Bi 








o 
@ 
wo 
tw 


ares 


fissase 
Saree 


MMMMMMM 


"iy =uns 


oo TTT 











gee aes 


RESBERBRE EBRD nag 


hd at tt nd ed ad et ON ot oe 


OO0000000000- 





TOUR RM 
* or o@ 


ed ag ee ee 


Bro Darr 


ps Kah AS | 


Pox i Does 3 


at Ht ot 


Stores 


ROTOR ES BRR OERS 


BEE eas 


yh tr A Ae 


Rg areer at 
ae x Tw hone 


A te a 


UOT TOF UTM 
== 


BS outan es TUKRTW 


 * oleh rt otro 


RRasah more sae 


php pe lh pi Sn pad 


BRRSooaeaaee 


a a tt a tt Yt tt tt 


70 
017016 


sy COE 
a7 


017022 


WLNKS 





BS Bo e398 


ed ed YD 


orm @aworm 
Two oor- 
MT DOOOCO 
Oa gd a a  ) 


m—Ww 


GPREOBT 


iL A et + 


ar nerbene 


a A tt 


aS 
OPHRRS S072 


Two 


FORA le 
tte UU 


Onn DUT 


o-« 


@ao- 
San Cor. ®@ 


WRTLOC= 010000 





BOSONS 


WRTSUB 012440 





TALL MOTION TEST CZTAD-D MACY11 30A‘ 1052) 3-MAR-78 OS: 
cz Aob-P1i 23-MAR-78 08:34 CROSS Sere RENCE TABLE -- 
XBSBG = 7738 72 
XREAD = oore 34 (2627 
= 
= 7768 1265 27356 2924 
XSFBG = 7758 
XSFFG = 7748 
XW = ooae 1 esee2 
XWR = 4 e569 
+ 10878 3209 3330 
SB0DAT 8488 13% 
8718 2 253 
sc 38 8 167% 174% 3183 31688 
$CK le 63 
SCMTAG 8348 1036 1037 104S 1051 
SCM1 = 6668 8678 8688 
SCMe = 6668 8678 Bb8a 
oe: sees be 
= 
SCNTLG ais e 
nah oe cy 
0738 2253 2ess 2258 
SOORGN 2074 20878 
sere 1927 207 . 1192 1262 20838 
SENORG 3038 fs 
serene 2079 r} 
SE 2009 a 
SEOPCT 10S1% #20738 # #%=2077 
p= ad 8378 el 163 2165 2171 
jo data ime 1 rr 165 2187 2191 
ane size $5 3% 2230% $2231 2253 
SERTTL 841 §5 * 2253 
SCAP 8708 1 % 1236% 1289 1302 
1443 14S9% 1474 1524 1569%# 
1728% 1746 1767 1733 180S* 
2186 scene 2244 2e46 e253 
SFILLC B6e8 160 3191 
SFILLS 8618 3191 
SGDADR 64Sa 
SepoaT Zs 251S* 3550 
$65 013520 32138 3481 
SHO = 000000 S92 
SHIOCT 014324 3362% 7678 
SICNT 001104 8388 Be 179 2181 2191 
SILLUP 015026 a ' 1 37% 
SINTAG 001135 8 1 30 
SITEMB 001114 B84e8 e2231% 2253 2261 
Stboon Bel ee Gots Sees [esos Fede 2 
* 
SLPERR 001110 sere 1056 2169 218S* 2191 
SMAIL = #eeHEE U 1073 1083 2184 2237 3144 





EOS 


36 PAGE 36 
USER SYMBOLS 
2982 2974 
10S2 1053 
2277 3156 
2248 
2191 22228 
3547 3550 
1315 1328 
1583 1597% 
1825S 1644 
2617 2618 
2189 2191 
2243 24S4e 


3006 


3191 


24S1# 
23ee* 


3032 


3240 


248S# 


2453* 
e9S0* 


3062 


3324 


297e* 


3735 


1398* 
1670# 
1933 


3004* 


SEQ 0095 


3030* 


SEQ 0095S 


3060+* 


SEG 0096 


SEQ 0096 


4-2 
OR TABLE’: DSEP SYMBOLS 


-MA 
NC 


T TEST TAD-D MACY11 30A(1 ) 23 
Plt #33 -nar-76 “ 734 RROse REFERE 


oD. 


ct 


2a = 6S 
om @ orconm— Omamo 
Rw ry] Hitt ators Bumrk 
rt i) Orro-tw MF ONO = 
—— tf “aru ttt 
ae s s 28 
wrt 2) =MT 0-0 WOW F fu 
wr @ tw. -OnR WO TWF 
Tt. Oo Or on—tu mF Of. @ 
aa “4 Se kenkeml ht Lit} at 
¥8 38 zs fs 
ory ft OwDnonNnD uwmnman 
mr ’é KR.CROFO TF-tuw 
Tt. oO OMwM-4— mr orw 
—“—— _ “fur Ht 
san 2 23 8 
FA yy w COMmNW® OoonrsT 
oo w OR WNIOMM UMOuUsT 
Tro oO OMOT— OTwr@w 
Sein] A | ol “fut ttt 
22a sas 3s 28 
owrmu ™ orr.orr FoONCOoOT 
oon we R38 tuMuroro 
Too OMOD-~-— MTWrWOO 
“—— -_ “tut Stet tl 
Be ig s s 8 
Fae + + =. band fu R.OruMm- oO WIFNMWWW 
wm fu 0 w TI-wWMOS Oo =—MmDovwo 
mor ~ w Oo 0M0D——— uw MOFTwWROO 
te ™ ™ = eben h? Li | OO tet tet ty 
oa F @ corre eee 
_ =“ =4 OrnrrvoOwo = F 2AMCTC-wW 
n.ToO o oO w w CFMOM CF wm -—-—-h Orr 
moo - ™ w Oo NON -« Uw MTHwWOOC 
te tu ™ ™ _ SN) tt tt te 
esa Fp og z 52 yuMP—m Red Beenie 
~ 
~ F w w 7? > 2 moo oO La 
303 sz = tw w ) om aay 4 au SSihpwo 
“—-— § © TU ™ ™ —™M See elit iitli’ Mil iy] os i Pr] 
Bae Se 0 +g zyewerD ger pRud-% 
= “4 be <4 
oC Few) 3D o w oO F TO DORAN -NR- oronm 
= OM =O = 4 w o- OMMNOoO—-uU ue UMM oDoo 
WU at tutu o oO «™ “frum fy tte 
tw 7mO x ~ rr no ~ wo MOCTMOM cur r FOMT 
7 — “4 
@ inie Son @ rw uw FT pat NAT wWO wuomrm 
= «© ban ~™ ww ww OoOw w XoO-uw - y iN Oh. Or 
WU tt wu tf mor ™ —<t “futur on hen hen han nomial 
aa hat Sot 00 wor 5 moO bs un OTD 
a 4 att 
caanazess 8 3 en es ee S888 Ber ROR Baas 
pat iat 8 y tu c tw % erly) = furutu ate aerees 
Bw & 4 teat $4 cas uy Onz he vo ror K me Son oO @ 
—_ 
® Bie 8 S95 88 58 says sage POSN HEPAMET SEAS 
poe “we £ 6 Ne ba tu =O pry = DUM FT OK. O-1-+ 
HM Nm tut tu- tu oo wu «MrT mts tt OO) 


sougeirShvhiaieinita Boss 3oius olnbiainre sengagaa see gs 


eerie! Sa pee reeliviatliviat) 


Ow7Twown nO 
7FTwory uw 





sg eR eee 
Gls Melicataty 








TA11 MOTION TEST 
ADO 23-MAR-78 OB: 


S4ochT= 
. = 02 


- ABS. 


ERRORS 


DSKZ: CZTADD, DSKZ: CZTADD. SEQ@=DSKZ:CZTADD.P11 
RUN-TIME: 20 14 i SECONDS 

RUN-TIME RATIO: 213/36=5.8 
CORE USED: 


DOCUMENT PAGES: 





et MACY11 30A(10S2) 


34538 
34 


23-MAR-78 O08 GE 98 
CROSS REFERENCE TABLE -- USER SYMBOLS 


4928 


g130 
J3e38 
31788 


34438 


875 
3330 


31838 aUgR8 34868 #34878 34888 


HOS 


